home *** CD-ROM | disk | FTP | other *** search
/ CD Fun House 1 / CD Fun House (Wayzata Technology).iso / •The Casino• / •Las Vegas• / Pai Gow •••• / PAI / PAI.rsrc / CODE_1.txt < prev    next >
Text File  |  1987-09-14  |  141KB  |  2,542 lines

  1. # near model CODE resource
  2. # jump table entries: 0-5 (6 of them)
  3. export_0:
  4. 00000000  486D FFFC                pea.l      [A5 - 0x4]
  5. 00000004  A86E                     syscall    InitGraf
  6. 00000006  A8FE                     syscall    InitFonts
  7. 00000008  A912                     syscall    InitWindows
  8. 0000000A  A930                     syscall    InitMenus
  9. 0000000C  42A7                     clr.l      -[A7]
  10. 0000000E  A97B                     syscall    InitDialogs
  11. 00000010  A9CC                     syscall    TEInit
  12. 00000012  4EAD 0052                jsr        [A5 + 0x52 /* export_6 */]
  13. 00000016  2F0C                     move.l     -[A7], A4
  14. 00000018  A9F1                     syscall    UnloadSeg
  15. 0000001A  42A7                     clr.l      -[A7]
  16. 0000001C  3F3C 0080                move.w     -[A7], 0x80
  17. 00000020  42A7                     clr.l      -[A7]
  18. 00000022  2F3C FFFF FFFF           move.l     -[A7], 0xFFFFFFFF
  19. 00000028  A9BD                     syscall    GetNewWindow
  20. 0000002A  2B5F FEC6                move.l     [A5 - 0x13A], [A7]+
  21. 0000002E  203C 0000 0800           move.l     D0, 0x800
  22. 00000034  A11E                     syscall    NewPtr, flags=1
  23. 00000036  2B48 FECE                move.l     [A5 - 0x132], A0
  24. 0000003A  43E8 000E                lea.l      A1, [A0 + 0xE]
  25. 0000003E  2089                     move.l     [A0], A1
  26. 00000040  317C 0018 0004           move.w     [A0 + 0x4], 0x18
  27. 00000046  203C 0000 0A80           move.l     D0, 0xA80
  28. 0000004C  A31E                     syscall    NewPtrClear, flags=3
  29. 0000004E  2B48 FECA                move.l     [A5 - 0x136], A0
  30. 00000052  43E8 000E                lea.l      A1, [A0 + 0xE]
  31. 00000056  2089                     move.l     [A0], A1
  32. 00000058  317C 001E 0004           move.w     [A0 + 0x4], 0x1E
  33. 0000005E  6100 0164                bsr        +0x166 /* 000001C4 */
  34. export_1:
  35. label00000062:
  36. 00000062  598F                     subq.l     A7, 4
  37. 00000064  A924                     syscall    FrontWindow
  38. 00000066  205F                     movea.l    A0, [A7]+
  39. 00000068  226D FED6                movea.l    A1, [A5 - 0x12A]
  40. 0000006C  2251                     movea.l    A1, [A1]
  41. 0000006E  B0FC 0000                cmpa.w     A0, 0x0
  42. 00000072  6700 002A                beq        +0x2C /* 0000009E */
  43. 00000076  3028 006C                move.w     D0, [A0 + 0x6C]
  44. 0000007A  6B00 0014                bmi        +0x16 /* 00000090 */
  45. 0000007E  08AD 0000 FEFE           bclr.b     [A5 - 0x102], 0x0
  46. 00000084  237C 0000 0000 000A      move.l     [A1 + 0xA], 0x0
  47. 0000008C  6000 0010                bra        +0x12 /* 0000009E */
  48. label00000090:
  49. 00000090  08ED 0000 FEFE           bset.b     [A5 - 0x102], 0x0
  50. 00000096  237C 0000 007B 000A      move.l     [A1 + 0xA], 0x7B /* '{' */
  51. label0000009E:
  52. 0000009E  A9B4                     syscall    SystemTask
  53. 000000A0  558F                     subq.l     A7, 2
  54. 000000A2  3F3C FFFF                move.w     -[A7], 0xFFFF
  55. 000000A6  486D FE8A                pea.l      [A5 - 0x176]
  56. 000000AA  A970                     syscall    GetNextEvent
  57. 000000AC  101F                     move.b     D0, [A7]+
  58. 000000AE  67B2                     beq        -0x4C /* 00000062 */
  59. 000000B0  4280                     clr.l      D0
  60. 000000B2  302D FE8A                move.w     D0, [A5 - 0x176]
  61. 000000B6  0C40 000F                cmpi.w     D0, 0xF
  62. 000000BA  6EA6                     bgt        -0x58 /* 00000062 */
  63. 000000BC  E548                     lsl        D0.w, 2
  64. 000000BE  41FA 0008                lea.l      A0, [PC + 0x8 /* 000000C8, value 0x4EFA003E */]
  65. 000000C2  4EB0 0000                jsr        [A0 + D0.w]
  66. 000000C6  609A                     bra        -0x64 /* 00000062 */
  67. 000000C8  4EFA 003E                jmp        [PC + 0x3E /* 00000108 */]
  68. 000000CC  4EFA 003C                jmp        [PC + 0x3C /* 0000010A */]
  69. 000000D0  4EFA 0036                jmp        [PC + 0x36 /* 00000108 */]
  70. 000000D4  4EFA 0284                jmp        [PC + 0x284 /* 0000035A */]
  71. 000000D8  4EFA 002E                jmp        [PC + 0x2E /* 00000108 */]
  72. 000000DC  4EFA 002A                jmp        [PC + 0x2A /* 00000108 */]
  73. 000000E0  4EFA 029C                jmp        [PC + 0x29C /* 0000037E */]
  74. 000000E4  4EFA 0022                jmp        [PC + 0x22 /* 00000108 */]
  75. 000000E8  4EFA 02AC                jmp        [PC + 0x2AC /* 00000396 */]
  76. 000000EC  4EFA 001A                jmp        [PC + 0x1A /* 00000108 */]
  77. 000000F0  4EFA 0016                jmp        [PC + 0x16 /* 00000108 */]
  78. 000000F4  4EFA 0012                jmp        [PC + 0x12 /* 00000108 */]
  79. 000000F8  4EFA 000E                jmp        [PC + 0xE /* 00000108 */]
  80. 000000FC  4EFA 000A                jmp        [PC + 0xA /* 00000108 */]
  81. 00000100  4EFA 0006                jmp        [PC + 0x6 /* 00000108 */]
  82. 00000104  4EFA 0002                jmp        [PC + 0x2 /* 00000108 */]
  83. label00000108:
  84. 00000108  4E75                     rts
  85. label0000010A:
  86. 0000010A  558F                     subq.l     A7, 2
  87. 0000010C  2F2D FE94                move.l     -[A7], [A5 - 0x16C]
  88. 00000110  486D FEBE                pea.l      [A5 - 0x142]
  89. 00000114  A92C                     syscall    FindWindow
  90. 00000116  301F                     move.w     D0, [A7]+
  91. 00000118  0280 0000 FFFF           andi.l     D0, 0xFFFF
  92. 0000011E  0C40 0003                cmpi.w     D0, 0x3
  93. 00000122  6E1C                     bgt        +0x1E /* 00000140 */
  94. 00000124  E548                     lsl        D0.w, 2
  95. 00000126  41FA 0008                lea.l      A0, [PC + 0x8 /* 00000130, value 0x4EFA000E */]
  96. 0000012A  4EB0 0000                jsr        [A0 + D0.w]
  97. 0000012E  4E75                     rts
  98. 00000130  4EFA 000E                jmp        [PC + 0xE /* 00000140 */]
  99. 00000134  4EFA 000C                jmp        [PC + 0xC /* 00000142 */]
  100. 00000138  4EFA 01F2                jmp        [PC + 0x1F2 /* 0000032C */]
  101. 0000013C  4EFA 01FA                jmp        [PC + 0x1FA /* 00000338 */]
  102. label00000140:
  103. 00000140  4E75                     rts
  104. label00000142:
  105. 00000142  598F                     subq.l     A7, 4
  106. 00000144  2F2D FE94                move.l     -[A7], [A5 - 0x16C]
  107. 00000148  A93D                     syscall    MenuSelect
  108. 0000014A  241F                     move.l     D2, [A7]+
  109. label0000014C:
  110. 0000014C  3B42 FEEA                move.w     [A5 - 0x116], D2
  111. 00000150  2202                     move.l     D1, D2
  112. 00000152  4841                     swap.w     D1
  113. 00000154  0281 0000 FFFF           andi.l     D1, 0xFFFF
  114. 0000015A  0282 0000 FFFF           andi.l     D2, 0xFFFF
  115. 00000160  0C41 0007                cmpi.w     D1, 0x7
  116. 00000164  6E00 000C                bgt        +0xE /* 00000172 */
  117. 00000168  E549                     lsl        D1.w, 2
  118. 0000016A  41FA 000C                lea.l      A0, [PC + 0xC /* 00000178, value 0x4EFA001E */]
  119. 0000016E  4EB0 1000                jsr        [A0 + D1.w]
  120. label00000172:
  121. 00000172  6100 0240                bsr        +0x242 /* 000003B4 */
  122. 00000176  4E75                     rts
  123. 00000178  4EFA 001E                jmp        [PC + 0x1E /* 00000198 */]
  124. 0000017C  4EFA 001C                jmp        [PC + 0x1C /* 0000019A */]
  125. 00000180  4EFA 006A                jmp        [PC + 0x6A /* 000001EC */]
  126. 00000184  4EFA 00A6                jmp        [PC + 0xA6 /* 0000022C */]
  127. 00000188  4EFA 00B6                jmp        [PC + 0xB6 /* 00000240 */]
  128. 0000018C  4EFA 00DC                jmp        [PC + 0xDC /* 0000026A */]
  129. 00000190  4EFA 014C                jmp        [PC + 0x14C /* 000002DE */]
  130. 00000194  4EFA 0174                jmp        [PC + 0x174 /* 0000030A */]
  131. label00000198:
  132. 00000198  4E75                     rts
  133. label0000019A:
  134. 0000019A  0C42 0001                cmpi.w     D2, 0x1
  135. 0000019E  6700 0024                beq        +0x26 /* 000001C4 */
  136. 000001A2  598F                     subq.l     A7, 4
  137. 000001A4  3F3C 0001                move.w     -[A7], 0x1
  138. 000001A8  A9BF                     syscall    GetRMenu
  139. 000001AA  221F                     move.l     D1, [A7]+
  140. 000001AC  2F01                     move.l     -[A7], D1
  141. 000001AE  3F2D FEEA                move.w     -[A7], [A5 - 0x116]
  142. 000001B2  486D FEAE                pea.l      [A5 - 0x152]
  143. 000001B6  A946                     syscall    GetMenuItemText/GetItem
  144. 000001B8  558F                     subq.l     A7, 2
  145. 000001BA  486D FEAE                pea.l      [A5 - 0x152]
  146. 000001BE  A9B6                     syscall    OpenDeskAcc
  147. 000001C0  301F                     move.w     D0, [A7]+
  148. 000001C2  4E75                     rts
  149. fn000001C4:
  150. 000001C4  598F                     subq.l     A7, 4
  151. 000001C6  3F3C 0080                move.w     -[A7], 0x80
  152. 000001CA  42A7                     clr.l      -[A7]
  153. 000001CC  2F3C FFFF FFFF           move.l     -[A7], 0xFFFFFFFF
  154. 000001D2  A97C                     syscall    GetNewDialog
  155. 000001D4  221F                     move.l     D1, [A7]+
  156. 000001D6  2F01                     move.l     -[A7], D1
  157. 000001D8  2F01                     move.l     -[A7], D1
  158. 000001DA  A873                     syscall    SetPort
  159. 000001DC  42A7                     clr.l      -[A7]
  160. 000001DE  486D FE9A                pea.l      [A5 - 0x166]
  161. 000001E2  A991                     syscall    ModalDialog
  162. 000001E4  221F                     move.l     D1, [A7]+
  163. 000001E6  2F01                     move.l     -[A7], D1
  164. 000001E8  A983                     syscall    DisposeDialog
  165. 000001EA  4E75                     rts
  166. label000001EC:
  167. 000001EC  0C42 0003                cmpi.w     D2, 0x3
  168. 000001F0  6E1A                     bgt        +0x1C /* 0000020C */
  169. 000001F2  E54A                     lsl        D2.w, 2
  170. 000001F4  41FA 0006                lea.l      A0, [PC + 0x6 /* 000001FC, value 0x4EFA000E */]
  171. 000001F8  4EB0 2000                jsr        [A0 + D2.w]
  172. 000001FC  4EFA 000E                jmp        [PC + 0xE /* 0000020C */]
  173. 00000200  4EFA 01B8                jmp        [PC + 0x1B8 /* 000003BA */]
  174. 00000204  4EFA 0006                jmp        [PC + 0x6 /* 0000020C */]
  175. 00000208  4EFA 0004                jmp        [PC + 0x4 /* 0000020E */]
  176. label0000020C:
  177. 0000020C  4E75                     rts
  178. label0000020E:
  179. 0000020E  4EBA 145E                jsr        [PC + 0x145E /* 0000166E */]
  180. 00000212  08ED 0001 FEFE           bset.b     [A5 - 0x102], 0x1
  181. 00000218  4EBA 160E                jsr        [PC + 0x160E /* 00001828 */]
  182. 0000021C  42A7                     clr.l      -[A7]
  183. 0000021E  3F3C 0004                move.w     -[A7], 0x4
  184. 00000222  A9B9                     syscall    GetCursor
  185. 00000224  205F                     movea.l    A0, [A7]+
  186. 00000226  2F10                     move.l     -[A7], [A0]
  187. 00000228  A851                     syscall    SetCursor
  188. 0000022A  A9F4                     syscall    ExitToShell
  189. label0000022C:
  190. 0000022C  302D FEEA                move.w     D0, [A5 - 0x116]
  191. 00000230  5340                     subq.w     D0, 1
  192. 00000232  558F                     subq.l     A7, 2
  193. 00000234  3F00                     move.w     -[A7], D0
  194. 00000236  A9C2                     syscall    SysEdit
  195. 00000238  101F                     move.b     D0, [A7]+
  196. 0000023A  6700 0002                beq        +0x4 /* 0000023E */
  197. label0000023E:
  198. 0000023E  4E75                     rts
  199. label00000240:
  200. 00000240  0C42 0005                cmpi.w     D2, 0x5
  201. 00000244  6E22                     bgt        +0x24 /* 00000268 */
  202. 00000246  E54A                     lsl        D2.w, 2
  203. 00000248  41FA 0006                lea.l      A0, [PC + 0x6 /* 00000250, value 0x4EFA0016 */]
  204. 0000024C  4EB0 2000                jsr        [A0 + D2.w]
  205. 00000250  4EFA 0016                jmp        [PC + 0x16 /* 00000268 */]
  206. 00000254  4EFA 0D3A                jmp        [PC + 0xD3A /* 00000F90 */]
  207. 00000258  4EFA 10CA                jmp        [PC + 0x10CA /* 00001324 */]
  208. 0000025C  4EFA 01A0                jmp        [PC + 0x1A0 /* 000003FE */]
  209. 00000260  4EFA 07D8                jmp        [PC + 0x7D8 /* 00000A3A */]
  210. 00000264  4EFA 0822                jmp        [PC + 0x822 /* 00000A88 */]
  211. label00000268:
  212. 00000268  4E75                     rts
  213. label0000026A:
  214. 0000026A  0C42 0007                cmpi.w     D2, 0x7
  215. 0000026E  6E6C                     bgt        +0x6E /* 000002DC */
  216. 00000270  3602                     move.w     D3, D2
  217. 00000272  617A                     bsr        +0x7C /* 000002EE */
  218. 00000274  0C43 0002                cmpi.w     D3, 0x2
  219. 00000278  660C                     bne        +0xE /* 00000286 */
  220. 0000027A  082D 0003 FEF8           btst.b     [A5 - 0x108], 0x3
  221. 00000280  675A                     beq        +0x5C /* 000002DC */
  222. 00000282  7403                     moveq.l    D2, 0x03
  223. 00000284  6168                     bsr        +0x6A /* 000002EE */
  224. label00000286:
  225. 00000286  0C43 0003                cmpi.w     D3, 0x3
  226. 0000028A  660C                     bne        +0xE /* 00000298 */
  227. 0000028C  082D 0002 FEF8           btst.b     [A5 - 0x108], 0x2
  228. 00000292  6748                     beq        +0x4A /* 000002DC */
  229. 00000294  7402                     moveq.l    D2, 0x02
  230. 00000296  6156                     bsr        +0x58 /* 000002EE */
  231. label00000298:
  232. 00000298  B67C 0004                cmp.w      D3, 0x4
  233. 0000029C  661C                     bne        +0x1E /* 000002BA */
  234. 0000029E  082D 0004 FEF8           btst.b     [A5 - 0x108], 0x4
  235. 000002A4  6714                     beq        +0x16 /* 000002BA */
  236. 000002A6  6100 10BC                bsr        +0x10BE /* 00001364 */
  237. 000002AA  4240                     clr.w      D0
  238. 000002AC  6100 1372                bsr        +0x1374 /* 00001620 */
  239. 000002B0  426D FCC6                clr.w      [A5 - 0x33A]
  240. 000002B4  6026                     bra        +0x28 /* 000002DC */
  241. 000002B6  6000 106C                bra        +0x106E /* 00001324 */
  242. label000002BA:
  243. 000002BA  0C43 0005                cmpi.w     D3, 0x5
  244. 000002BE  661C                     bne        +0x1E /* 000002DC */
  245. 000002C0  082D 0005 FEF8           btst.b     [A5 - 0x108], 0x5
  246. 000002C6  6700 04D0                beq        +0x4D2 /* 00000798 */
  247. 000002CA  082D 0001 FEF8           btst.b     [A5 - 0x108], 0x1
  248. 000002D0  660A                     bne        +0xC /* 000002DC */
  249. 000002D2  4A6D FE88                tst.w      [A5 - 0x178]
  250. 000002D6  6704                     beq        +0x6 /* 000002DC */
  251. 000002D8  6000 0438                bra        +0x43A /* 00000712 */
  252. label000002DC:
  253. 000002DC  4E75                     rts
  254. label000002DE:
  255. 000002DE  0C42 0007                cmpi.w     D2, 0x7
  256. 000002E2  6E24                     bgt        +0x26 /* 00000308 */
  257. 000002E4  41ED FEF9                lea.l      A0, [A5 - 0x107]
  258. 000002E8  226D FEE2                movea.l    A1, [A5 - 0x11E]
  259. 000002EC  6008                     bra        +0xA /* 000002F6 */
  260. fn000002EE:
  261. 000002EE  41ED FEF8                lea.l      A0, [A5 - 0x108]
  262. 000002F2  226D FEDE                movea.l    A1, [A5 - 0x122]
  263. label000002F6:
  264. 000002F6  4240                     clr.w      D0
  265. 000002F8  0550                     bchg       [A0], D2
  266. 000002FA  6604                     bne        +0x6 /* 00000300 */
  267. 000002FC  303C FFFF                move.w     D0, 0xFFFF
  268. label00000300:
  269. 00000300  2F09                     move.l     -[A7], A1
  270. 00000302  3F02                     move.w     -[A7], D2
  271. 00000304  3F00                     move.w     -[A7], D0
  272. 00000306  A945                     syscall    CheckItem
  273. label00000308:
  274. 00000308  4E75                     rts
  275. label0000030A:
  276. 0000030A  0C42 0001                cmpi.w     D2, 0x1
  277. 0000030E  6700 1838                beq        +0x183A /* 00001B48 */
  278. 00000312  0C42 0002                cmpi.w     D2, 0x2
  279. 00000316  6700 186C                beq        +0x186E /* 00001B84 */
  280. 0000031A  0C42 0003                cmpi.w     D2, 0x3
  281. 0000031E  6700 186C                beq        +0x186E /* 00001B8C */
  282. 00000322  0C42 0005                cmpi.w     D2, 0x5
  283. 00000326  6700 1500                beq        +0x1502 /* 00001828 */
  284. 0000032A  4E75                     rts
  285. label0000032C:
  286. 0000032C  486D FE8A                pea.l      [A5 - 0x176]
  287. 00000330  2F2D FEBE                move.l     -[A7], [A5 - 0x142]
  288. 00000334  A9B3                     syscall    SystemClick
  289. 00000336  4E75                     rts
  290. label00000338:
  291. 00000338  206D FEBE                movea.l    A0, [A5 - 0x142]
  292. 0000033C  3028 006E                move.w     D0, [A0 + 0x6E]
  293. 00000340  0800 0000                btst.b     D0, 0x0
  294. 00000344  610C                     bsr        +0xE /* 00000352 */
  295. 00000346  486D FE94                pea.l      [A5 - 0x16C]
  296. 0000034A  A871                     syscall    GlobalToLocal
  297. 0000034C  4EBA 0502                jsr        [PC + 0x502 /* 00000850 */]
  298. 00000350  4E75                     rts
  299. fn00000352:
  300. 00000352  2F2D FEBE                move.l     -[A7], [A5 - 0x142]
  301. 00000356  A91F                     syscall    SelectWindow
  302. 00000358  4E75                     rts
  303. label0000035A:
  304. 0000035A  302D FE98                move.w     D0, [A5 - 0x168]
  305. 0000035E  0240 0100                andi.w     D0, 0x100
  306. 00000362  6700 0018                beq        +0x1A /* 0000037C */
  307. 00000366  202D FE8C                move.l     D0, [A5 - 0x174]
  308. 0000036A  0280 0000 00FF           andi.l     D0, 0xFF
  309. 00000370  598F                     subq.l     A7, 4
  310. 00000372  3F00                     move.w     -[A7], D0
  311. 00000374  A93E                     syscall    MenuKey
  312. 00000376  241F                     move.l     D2, [A7]+
  313. 00000378  6000 FDD2                bra        -0x22C /* 0000014C */
  314. label0000037C:
  315. 0000037C  4E75                     rts
  316. label0000037E:
  317. 0000037E  2B6D FE8C FEBE           move.l     [A5 - 0x142], [A5 - 0x174]
  318. 00000384  2F2D FEBE                move.l     -[A7], [A5 - 0x142]
  319. 00000388  A922                     syscall    BeginUpdate
  320. 0000038A  4EBA 0210                jsr        [PC + 0x210 /* 0000059C */]
  321. 0000038E  2F2D FEBE                move.l     -[A7], [A5 - 0x142]
  322. 00000392  A923                     syscall    EndUpdate
  323. 00000394  4E75                     rts
  324. label00000396:
  325. 00000396  302D FE98                move.w     D0, [A5 - 0x168]
  326. 0000039A  0800 0000                btst.b     D0, 0x0
  327. 0000039E  670E                     beq        +0x10 /* 000003AE */
  328. 000003A0  2B6D FE8C FEC2           move.l     [A5 - 0x13E], [A5 - 0x174]
  329. 000003A6  2F2D FEC2                move.l     -[A7], [A5 - 0x13E]
  330. 000003AA  A873                     syscall    SetPort
  331. 000003AC  4E75                     rts
  332. label000003AE:
  333. 000003AE  42AD FEC2                clr.l      [A5 - 0x13E]
  334. 000003B2  4E75                     rts
  335. fn000003B4:
  336. 000003B4  4267                     clr.w      -[A7]
  337. 000003B6  A938                     syscall    HiliteMenu
  338. 000003B8  4E75                     rts
  339. label000003BA:
  340. 000003BA  4EBA 0D4A                jsr        [PC + 0xD4A /* 00001106 */]
  341. 000003BE  673C                     beq        +0x3E /* 000003FC */
  342. 000003C0  41ED FD04                lea.l      A0, [A5 - 0x2FC]
  343. 000003C4  2230 0000                move.l     D1, [A0 + D0.w]
  344. 000003C8  0C81 0000 0C80           cmpi.l     D1, 0xC80
  345. 000003CE  6D12                     blt        +0x14 /* 000003E2 */
  346. 000003D0  3F00                     move.w     -[A7], D0
  347. 000003D2  303C 000B                move.w     D0, 0xB
  348. 000003D6  4EBA 0C56                jsr        [PC + 0xC56 /* 0000102E */]
  349. 000003DA  301F                     move.w     D0, [A7]+
  350. 000003DC  0C41 0001                cmpi.w     D1, 0x1
  351. 000003E0  661A                     bne        +0x1C /* 000003FC */
  352. label000003E2:
  353. 000003E2  41ED FD04                lea.l      A0, [A5 - 0x2FC]
  354. 000003E6  21BC 0000 0C80 0000      move.l     [A0 + D0.w], 0xC80
  355. 000003EE  41ED FD34                lea.l      A0, [A5 - 0x2CC]
  356. 000003F2  E248                     lsr        D0.w, 1
  357. 000003F4  4270 0000                clr.w      [A0 + D0.w]
  358. 000003F8  4EBA 0FC4                jsr        [PC + 0xFC4 /* 000013BE */]
  359. label000003FC:
  360. 000003FC  4E75                     rts
  361. label000003FE:
  362. 000003FE  302D FE88                move.w     D0, [A5 - 0x178]
  363. 00000402  670E                     beq        +0x10 /* 00000412 */
  364. 00000404  0C40 0003                cmpi.w     D0, 0x3
  365. 00000408  6704                     beq        +0x6 /* 0000040E */
  366. 0000040A  6000 171C                bra        +0x171E /* 00001B28 */
  367. label0000040E:
  368. 0000040E  4EBA 0678                jsr        [PC + 0x678 /* 00000A88 */]
  369. label00000412:
  370. 00000412  7807                     moveq.l    D4, 0x07
  371. label00000414:
  372. 00000414  3004                     move.w     D0, D4
  373. 00000416  4EBA 1560                jsr        [PC + 0x1560 /* 00001978 */]
  374. 0000041A  41FA 0006                lea.l      A0, [PC + 0x6 /* 00000422, value 0x606A6014 */]
  375. 0000041E  4EF0 1000                jmp        [A0 + D1.w]
  376. 00000422  606A                     bra        +0x6C /* 0000048E */
  377. 00000424  6014                     bra        +0x16 /* 0000043A */
  378. 00000426  6074                     bra        +0x76 /* 0000049C */
  379. 00000428  6010                     bra        +0x12 /* 0000043A */
  380. 0000042A  3004                     move.w     D0, D4
  381. 0000042C  E348                     lsl        D0.w, 1
  382. 0000042E  41ED FD24                lea.l      A0, [A5 - 0x2DC]
  383. 00000432  3030 0000                move.w     D0, [A0 + D0.w]
  384. 00000436  4EBA 1574                jsr        [PC + 0x1574 /* 000019AC */]
  385. label0000043A:
  386. 0000043A  51CC FFD8                dbf        D4, -0x2A /* 00000414 */
  387. 0000043E  4EBA 009C                jsr        [PC + 0x9C /* 000004DC */]
  388. 00000442  4EBA 00BE                jsr        [PC + 0xBE /* 00000502 */]
  389. 00000446  082D 0001 FEF8           btst.b     [A5 - 0x108], 0x1
  390. 0000044C  671C                     beq        +0x1E /* 0000046A */
  391. 0000044E  302D FCC4                move.w     D0, [A5 - 0x33C]
  392. 00000452  0C40 0008                cmpi.w     D0, 0x8
  393. 00000456  6C08                     bge        +0xA /* 00000460 */
  394. 00000458  47FA 04B4                lea.l      A3, [PC + 0x4B4 /* 0000090E, value 0x79017B, cstring "" */]
  395. 0000045C  4EBA 0710                jsr        [PC + 0x710 /* 00000B6E */]
  396. label00000460:
  397. 00000460  3B7C 0008 FCC4           move.w     [A5 - 0x33C], 0x8
  398. 00000466  422D FEFD                clr.b      [A5 - 0x103]
  399. label0000046A:
  400. 0000046A  7004                     moveq.l    D0, 0x04
  401. 0000046C  4EBA 0C34                jsr        [PC + 0xC34 /* 000010A2 */]
  402. 00000470  7002                     moveq.l    D0, 0x02
  403. 00000472  4EBA 0C38                jsr        [PC + 0xC38 /* 000010AC */]
  404. 00000476  4EBA 0C66                jsr        [PC + 0xC66 /* 000010DE */]
  405. 0000047A  3B7C 0001 FE88           move.w     [A5 - 0x178], 0x1
  406. 00000480  4EBA 164C                jsr        [PC + 0x164C /* 00001ACE */]
  407. 00000484  4EBA 0200                jsr        [PC + 0x200 /* 00000686 */]
  408. 00000488  4EBA 01A8                jsr        [PC + 0x1A8 /* 00000632 */]
  409. 0000048C  4E75                     rts
  410. label0000048E:
  411. 0000048E  3004                     move.w     D0, D4
  412. 00000490  4EBA 0BDE                jsr        [PC + 0xBDE /* 00001070 */]
  413. 00000494  303C 0005                move.w     D0, 0x5
  414. 00000498  6000 0B8A                bra        +0xB8C /* 00001024 */
  415. label0000049C:
  416. 0000049C  6110                     bsr        +0x12 /* 000004AE */
  417. 0000049E  6F9A                     ble        -0x64 /* 0000043A */
  418. 000004A0  3004                     move.w     D0, D4
  419. 000004A2  4EBA 0BCC                jsr        [PC + 0xBCC /* 00001070 */]
  420. 000004A6  303C 0008                move.w     D0, 0x8
  421. 000004AA  6000 0B78                bra        +0xB7A /* 00001024 */
  422. fn000004AE:
  423. 000004AE  7407                     moveq.l    D2, 0x07
  424. 000004B0  4281                     clr.l      D1
  425. 000004B2  41ED FD24                lea.l      A0, [A5 - 0x2DC]
  426. label000004B6:
  427. 000004B6  B46D FCC6                cmp.w      D2, [A5 - 0x33A]
  428. 000004BA  670A                     beq        +0xC /* 000004C6 */
  429. 000004BC  2002                     move.l     D0, D2
  430. 000004BE  E348                     lsl        D0.w, 1
  431. 000004C0  3030 0000                move.w     D0, [A0 + D0.w]
  432. 000004C4  D280                     add.l      D1, D0
  433. label000004C6:
  434. 000004C6  51CA FFEE                dbf        D2, -0x14 /* 000004B6 */
  435. 000004CA  48C1                     ext.l      D1
  436. 000004CC  41ED FD04                lea.l      A0, [A5 - 0x2FC]
  437. 000004D0  302D FCC6                move.w     D0, [A5 - 0x33A]
  438. 000004D4  E548                     lsl        D0.w, 2
  439. 000004D6  B2B0 0000                cmp.l      D1, [A0 + D0.w]
  440. 000004DA  4E75                     rts
  441. fn000004DC:
  442. 000004DC  383C 001F                move.w     D4, 0x1F
  443. 000004E0  49ED FCA4                lea.l      A4, [A5 - 0x35C]
  444. label000004E4:
  445. 000004E4  4267                     clr.w      -[A7]
  446. 000004E6  A861                     syscall    Random
  447. 000004E8  301F                     move.w     D0, [A7]+
  448. 000004EA  C07C 001F                and.w      D0, 0x1F
  449. 000004EE  1234 0000                move.b     D1, [A4 + D0.w]
  450. 000004F2  19B4 4000 0000           move.b     [A4 + D0.w], [A4 + D4.w]
  451. 000004F8  1981 4000                move.b     [A4 + D4.w], D1
  452. 000004FC  51CC FFE6                dbf        D4, -0x1C /* 000004E4 */
  453. 00000500  4E75                     rts
  454. fn00000502:
  455. 00000502  45ED FD44                lea.l      A2, [A5 - 0x2BC]
  456. 00000506  4283                     clr.l      D3
  457. 00000508  7802                     moveq.l    D4, 0x02
  458. label0000050A:
  459. 0000050A  4267                     clr.w      -[A7]
  460. 0000050C  A861                     syscall    Random
  461. 0000050E  4280                     clr.l      D0
  462. 00000510  301F                     move.w     D0, [A7]+
  463. 00000512  80FC 0006                divu.w     D0, 0x6
  464. 00000516  4840                     swap.w     D0
  465. 00000518  0640 0001                addi.w     D0, 0x1
  466. 0000051C  34C0                     move.w     [A2]+, D0
  467. 0000051E  D640                     add.w      D3, D0
  468. 00000520  51CC FFE8                dbf        D4, -0x1A /* 0000050A */
  469. 00000524  5343                     subq.w     D3, 1
  470. 00000526  86FC 0008                divu.w     D3, 0x8
  471. 0000052A  4843                     swap.w     D3
  472. 0000052C  3003                     move.w     D0, D3
  473. 0000052E  E548                     lsl        D0.w, 2
  474. 00000530  43ED FCCC                lea.l      A1, [A5 - 0x334]
  475. 00000534  43F1 0000                lea.l      A1, [A1 + D0.w]
  476. 00000538  41ED FCA4                lea.l      A0, [A5 - 0x35C]
  477. 0000053C  303C 0007                move.w     D0, 0x7
  478. 00000540  9043                     sub.w      D0, D3
  479. label00000542:
  480. 00000542  22D8                     move.l     [A1]+, [A0]+
  481. 00000544  51C8 FFFC                dbf        D0, -0x6 /* 00000542 */
  482. 00000548  43ED FCCC                lea.l      A1, [A5 - 0x334]
  483. 0000054C  6002                     bra        +0x4 /* 00000550 */
  484. label0000054E:
  485. 0000054E  22D8                     move.l     [A1]+, [A0]+
  486. label00000550:
  487. 00000550  51CB FFFC                dbf        D3, -0x6 /* 0000054E */
  488. 00000554  7618                     moveq.l    D3, 0x18
  489. label00000556:
  490. 00000556  49FA 00B2                lea.l      A4, [PC + 0xB2 /* 0000060A, value 0xA0025 '\n\0%', cstring "" */]
  491. 0000055A  7802                     moveq.l    D4, 0x02
  492. label0000055C:
  493. 0000055C  4267                     clr.w      -[A7]
  494. 0000055E  A861                     syscall    Random
  495. 00000560  4280                     clr.l      D0
  496. 00000562  301F                     move.w     D0, [A7]+
  497. 00000564  80FC 0007                divu.w     D0, 0x7
  498. 00000568  4840                     swap.w     D0
  499. 0000056A  0640 00C8                addi.w     D0, 0xC8
  500. 0000056E  2B5C FEF0                move.l     [A5 - 0x110], [A4]+
  501. 00000572  4EBA 00A2                jsr        [PC + 0xA2 /* 00000616 */]
  502. 00000576  51CC FFE4                dbf        D4, -0x1E /* 0000055C */
  503. 0000057A  51CB FFDA                dbf        D3, -0x28 /* 00000556 */
  504. 0000057E  47ED FD44                lea.l      A3, [A5 - 0x2BC]
  505. 00000582  49FA 0086                lea.l      A4, [PC + 0x86 /* 0000060A, value 0xA0025 '\n\0%', cstring "" */]
  506. 00000586  7802                     moveq.l    D4, 0x02
  507. label00000588:
  508. 00000588  301B                     move.w     D0, [A3]+
  509. 0000058A  0640 00C8                addi.w     D0, 0xC8
  510. 0000058E  2B5C FEF0                move.l     [A5 - 0x110], [A4]+
  511. 00000592  4EBA 0082                jsr        [PC + 0x82 /* 00000616 */]
  512. 00000596  51CC FFF0                dbf        D4, -0x12 /* 00000588 */
  513. 0000059A  4E75                     rts
  514. fn0000059C:
  515. 0000059C  486D FEBE                pea.l      [A5 - 0x142]
  516. 000005A0  A874                     syscall    GetPort
  517. 000005A2  2F2D FEC6                move.l     -[A7], [A5 - 0x13A]
  518. 000005A6  A873                     syscall    SetPort
  519. 000005A8  2B7C 0054 0049 FEF0      move.l     [A5 - 0x110], 0x540049 /* 'T\0I' */
  520. 000005B0  2B7C 00BD 01A1 FEF4      move.l     [A5 - 0x10C], 0xBD01A1
  521. 000005B8  303C 0096                move.w     D0, 0x96
  522. 000005BC  4EBA 027E                jsr        [PC + 0x27E /* 0000083C */]
  523. 000005C0  47ED FD44                lea.l      A3, [A5 - 0x2BC]
  524. 000005C4  49FA 0044                lea.l      A4, [PC + 0x44 /* 0000060A, value 0xA0025 '\n\0%', cstring "" */]
  525. 000005C8  7802                     moveq.l    D4, 0x02
  526. label000005CA:
  527. 000005CA  2B5C FEF0                move.l     [A5 - 0x110], [A4]+
  528. 000005CE  301B                     move.w     D0, [A3]+
  529. 000005D0  0640 00C8                addi.w     D0, 0xC8
  530. 000005D4  4EBA 0040                jsr        [PC + 0x40 /* 00000616 */]
  531. 000005D8  51CC FFF0                dbf        D4, -0x12 /* 000005CA */
  532. 000005DC  4EBA 0054                jsr        [PC + 0x54 /* 00000632 */]
  533. 000005E0  382D FCC4                move.w     D4, [A5 - 0x33C]
  534. 000005E4  4EBA 040A                jsr        [PC + 0x40A /* 000009F0 */]
  535. 000005E8  302D FE88                move.w     D0, [A5 - 0x178]
  536. 000005EC  0C40 0002                cmpi.w     D0, 0x2
  537. 000005F0  6D04                     blt        +0x6 /* 000005F6 */
  538. 000005F2  4EBA 05A4                jsr        [PC + 0x5A4 /* 00000B98 */]
  539. label000005F6:
  540. 000005F6  4EBA 0DA8                jsr        [PC + 0xDA8 /* 000013A0 */]
  541. 000005FA  4EBA 0FA8                jsr        [PC + 0xFA8 /* 000015A4 */]
  542. 000005FE  4EBA 14CE                jsr        [PC + 0x14CE /* 00001ACE */]
  543. 00000602  2F2D FEBE                move.l     -[A7], [A5 - 0x142]
  544. 00000606  A873                     syscall    SetPort
  545. 00000608  4E75                     rts
  546. 0000060A  000A 0025                ori.b      A2, 0x25 /* '%' */
  547. 0000060E  000A 004A                ori.b      A2, 0x4A /* 'J' */
  548. 00000612  002A 0038 222D           ori.b      [A2 + 0x222D], 0x38 /* '8' */
  549. // begin alternate branch 00000616-00000620
  550. fn00000616:
  551. 00000616  222D FEF0                move.l     D1, [A5 - 0x110]
  552. 0000061A  0681 0020 0020           addi.l     D1, 0x200020 /* ' \0 ' */
  553. // end alternate branch 00000616-00000620
  554. fn00000616: // (misaligned)
  555. 00000618  FEF0 0681                .extension 0xEF0 <<F/2-3/7>> // unimplemented
  556. 0000061C  0020 0020                ori.b      -[A0], 0x20 /* ' ' */
  557. 00000620  2B41 FEF4                move.l     [A5 - 0x10C], D1
  558. 00000624  486D FEF0                pea.l      [A5 - 0x110]
  559. 00000628  42A7                     clr.l      -[A7]
  560. 0000062A  3F00                     move.w     -[A7], D0
  561. 0000062C  A9BB                     syscall    GetIcon
  562. 0000062E  A94B                     syscall    PlotIcon
  563. 00000630  4E75                     rts
  564. fn00000632:
  565. 00000632  4EBA 0158                jsr        [PC + 0x158 /* 0000078C */]
  566. 00000636  2B7C 0000 0128 FEF0      move.l     [A5 - 0x110], 0x128
  567. 0000063E  2B7C 0054 0153 FEF4      move.l     [A5 - 0x10C], 0x540153
  568. 00000646  302D FE88                move.w     D0, [A5 - 0x178]
  569. 0000064A  672A                     beq        +0x2C /* 00000676 */
  570. 0000064C  2F04                     move.l     -[A7], D4
  571. 0000064E  0C40 0001                cmpi.w     D0, 0x1
  572. 00000652  6700 0094                beq        +0x96 /* 000006E8 */
  573. 00000656  082D 0005 FEF8           btst.b     [A5 - 0x108], 0x5
  574. 0000065C  6700 0006                beq        +0x8 /* 00000664 */
  575. 00000660  6100 00C8                bsr        +0xCA /* 0000072A */
  576. label00000664:
  577. 00000664  7803                     moveq.l    D4, 0x03
  578. label00000666:
  579. 00000666  41ED FCC8                lea.l      A0, [A5 - 0x338]
  580. 0000066A  4EBA 01B0                jsr        [PC + 0x1B0 /* 0000081C */]
  581. 0000066E  51CC FFF6                dbf        D4, -0xC /* 00000666 */
  582. 00000672  281F                     move.l     D4, [A7]+
  583. 00000674  4E75                     rts
  584. label00000676:
  585. 00000676  2B7C 0000 009B FEF0      move.l     [A5 - 0x110], 0x9B
  586. label0000067E:
  587. 0000067E  486D FEF0                pea.l      [A5 - 0x110]
  588. 00000682  A8A3                     syscall    EraseRect
  589. 00000684  4E75                     rts
  590. fn00000686:
  591. 00000686  4EBA 00F8                jsr        [PC + 0xF8 /* 00000780 */]
  592. 0000068A  4A6D FE88                tst.w      [A5 - 0x178]
  593. 0000068E  676A                     beq        +0x6C /* 000006FA */
  594. 00000690  2F04                     move.l     -[A7], D4
  595. 00000692  302D FCC4                move.w     D0, [A5 - 0x33C]
  596. 00000696  0C40 0008                cmpi.w     D0, 0x8
  597. 0000069A  6C3C                     bge        +0x3E /* 000006D8 */
  598. 0000069C  012D FEF9                btst       [A5 - 0x107], D0
  599. 000006A0  6736                     beq        +0x38 /* 000006D8 */
  600. 000006A2  2B7C 00D6 0128 FEF0      move.l     [A5 - 0x110], 0xD60128
  601. 000006AA  2B7C 012A 0153 FEF4      move.l     [A5 - 0x10C], 0x12A0153
  602. 000006B2  7803                     moveq.l    D4, 0x03
  603. label000006B4:
  604. 000006B4  302D FCC4                move.w     D0, [A5 - 0x33C]
  605. 000006B8  41ED FCCC                lea.l      A0, [A5 - 0x334]
  606. 000006BC  E548                     lsl        D0.w, 2
  607. 000006BE  41F0 0000                lea.l      A0, [A0 + D0.w]
  608. 000006C2  4EBA 0158                jsr        [PC + 0x158 /* 0000081C */]
  609. 000006C6  51CC FFEC                dbf        D4, -0x16 /* 000006B4 */
  610. 000006CA  082D 0005 FEF8           btst.b     [A5 - 0x108], 0x5
  611. 000006D0  6724                     beq        +0x26 /* 000006F6 */
  612. 000006D2  4EBA 003E                jsr        [PC + 0x3E /* 00000712 */]
  613. 000006D6  601E                     bra        +0x20 /* 000006F6 */
  614. label000006D8:
  615. 000006D8  2B7C 00D6 0128 FEF0      move.l     [A5 - 0x110], 0xD60128
  616. 000006E0  2B7C 012A 0153 FEF4      move.l     [A5 - 0x10C], 0x12A0153
  617. label000006E8:
  618. 000006E8  7803                     moveq.l    D4, 0x03
  619. label000006EA:
  620. 000006EA  41FA 0022                lea.l      A0, [PC + 0x22 /* 0000070E, value 0x15151515 */]
  621. 000006EE  4EBA 012C                jsr        [PC + 0x12C /* 0000081C */]
  622. 000006F2  51CC FFF6                dbf        D4, -0xC /* 000006EA */
  623. label000006F6:
  624. 000006F6  281F                     move.l     D4, [A7]+
  625. 000006F8  4E75                     rts
  626. label000006FA:
  627. 000006FA  2B7C 00D6 0098 FEF0      move.l     [A5 - 0x110], 0xD60098
  628. 00000702  2B7C 012A 0153 FEF4      move.l     [A5 - 0x10C], 0x12A0153
  629. 0000070A  6000 FF72                bra        -0x8C /* 0000067E */
  630. 0000070E  1515                     move.b     -[A2], [A5]
  631. 00000710  1515                     move.b     -[A2], [A5]
  632. fn00000712:
  633. 00000712  2B7C 00F0 0097 FE80      move.l     [A5 - 0x180], 0xF00097
  634. 0000071A  2B7C 00F0 0154 FE84      move.l     [A5 - 0x17C], 0xF00154
  635. 00000722  302D FCC4                move.w     D0, [A5 - 0x33C]
  636. 00000726  E548                     lsl        D0.w, 2
  637. 00000728  6012                     bra        +0x14 /* 0000073C */
  638. fn0000072A:
  639. 0000072A  2B7C 0060 00C7 FE80      move.l     [A5 - 0x180], 0x6000C7
  640. 00000732  2B7C 0060 0124 FE84      move.l     [A5 - 0x17C], 0x600124
  641. 0000073A  4280                     clr.l      D0
  642. label0000073C:
  643. 0000073C  41ED FCCC                lea.l      A0, [A5 - 0x334]
  644. 00000740  2B70 0000 FEEC           move.l     [A5 - 0x114], [A0 + D0.w]
  645. 00000746  486D FEEC                pea.l      [A5 - 0x114]
  646. 0000074A  4EBA 047A                jsr        [PC + 0x47A /* 00000BC6 */]
  647. 0000074E  4A41                     tst.w      D1
  648. 00000750  6702                     beq        +0x4 /* 00000754 */
  649. 00000752  4840                     swap.w     D0
  650. label00000754:
  651. 00000754  2F00                     move.l     -[A7], D0
  652. 00000756  617E                     bsr        +0x80 /* 000007D6 */
  653. 00000758  4267                     clr.w      -[A7]
  654. 0000075A  486D FD58                pea.l      [A5 - 0x2A8]
  655. 0000075E  A88C                     syscall    StringWidth
  656. 00000760  202D FE80                move.l     D0, [A5 - 0x180]
  657. 00000764  905F                     sub.w      D0, [A7]+
  658. 00000766  2F00                     move.l     -[A7], D0
  659. 00000768  A893                     syscall    MoveTo
  660. 0000076A  486D FD58                pea.l      [A5 - 0x2A8]
  661. 0000076E  A884                     syscall    DrawString
  662. 00000770  6164                     bsr        +0x66 /* 000007D6 */
  663. 00000772  2F2D FE84                move.l     -[A7], [A5 - 0x17C]
  664. 00000776  A893                     syscall    MoveTo
  665. 00000778  486D FD58                pea.l      [A5 - 0x2A8]
  666. 0000077C  A884                     syscall    DrawString
  667. 0000077E  4E75                     rts
  668. fn00000780:
  669. 00000780  48E7 1820                movem.l    -[A7], D3,D4,A2
  670. 00000784  45FA 0030                lea.l      A2, [PC + 0x30 /* 000007B6, value 0xE40047, cstring "" */]
  671. 00000788  7801                     moveq.l    D4, 0x01
  672. 0000078A  6016                     bra        +0x18 /* 000007A2 */
  673. fn0000078C:
  674. 0000078C  48E7 1820                movem.l    -[A7], D3,D4,A2
  675. 00000790  45FA 0034                lea.l      A2, [PC + 0x34 /* 000007C6, value 0x550077 'U\0w', cstring "" */]
  676. 00000794  7801                     moveq.l    D4, 0x01
  677. 00000796  600A                     bra        +0xC /* 000007A2 */
  678. label00000798:
  679. 00000798  48E7 1820                movem.l    -[A7], D3,D4,A2
  680. 0000079C  45FA 0018                lea.l      A2, [PC + 0x18 /* 000007B6, value 0xE40047, cstring "" */]
  681. 000007A0  7803                     moveq.l    D4, 0x03
  682. label000007A2:
  683. 000007A2  4283                     clr.l      D3
  684. label000007A4:
  685. 000007A4  4872 3000                pea.l      [A2 + D3.w]
  686. 000007A8  A8A3                     syscall    EraseRect
  687. 000007AA  5043                     addq.w     D3, 8
  688. 000007AC  51CC FFF6                dbf        D4, -0xC /* 000007A4 */
  689. 000007B0  4CDF 0418                movem.l    D3,D4,A2, [A7]+
  690. 000007B4  4E75                     rts
  691. 000007B6  00E4                     .incomplete
  692. 000007B8  0047 00F3                ori.w      D7, 0xF3
  693. 000007BC  0097 00E4 0154           ori.l      [A7], 0xE40154
  694. 000007C2  00F3                     .incomplete
  695. 000007C4  01A4                     bclr       -[A4], D0
  696. 000007C6  0055 0077                ori.w      [A5], 0x77 /* 'w' */
  697. 000007CA  0067 00C7                ori.w      -[A7], 0xC7
  698. 000007CE  0055 0124                ori.w      [A5], 0x124
  699. 000007D2  0067 0177                ori.w      -[A7], 0x177
  700. fn000007D6:
  701. 000007D6  4280                     clr.l      D0
  702. 000007D8  302F 0004                move.w     D0, [A7 + 0x4]
  703. 000007DC  80FC 1000                divu.w     D0, 0x1000
  704. 000007E0  5240                     addq.w     D0, 1
  705. 000007E2  486D FD58                pea.l      [A5 - 0x2A8]
  706. 000007E6  3F3C 0080                move.w     -[A7], 0x80
  707. 000007EA  3F00                     move.w     -[A7], D0
  708. 000007EC  4EBA 1210                jsr        [PC + 0x1210 /* 000019FE */]
  709. 000007F0  41ED FE58                lea.l      A0, [A5 - 0x1A8]
  710. 000007F4  322F 0004                move.w     D1, [A7 + 0x4]
  711. 000007F8  C27C 0FFF                and.w      D1, 0xFFF
  712. 000007FC  E849                     lsr        D1.w, 4
  713. 000007FE  7015                     moveq.l    D0, 0x15
  714. 00000800  9041                     sub.w      D0, D1
  715. 00000802  4267                     clr.w      -[A7]
  716. 00000804  A9EE                     syscall    Pack7/DecStr68K
  717. 00000806  486D FD58                pea.l      [A5 - 0x2A8]
  718. 0000080A  486D FE58                pea.l      [A5 - 0x1A8]
  719. 0000080E  486D FD58                pea.l      [A5 - 0x2A8]
  720. 00000812  4EBA 124C                jsr        [PC + 0x124C /* 00001A60 */]
  721. 00000816  205F                     movea.l    A0, [A7]+
  722. 00000818  544F                     addq.w     A7, 2
  723. 0000081A  4ED0                     jmp        [A0]
  724. fn0000081C:
  725. 0000081C  4280                     clr.l      D0
  726. 0000081E  1030 4000                move.b     D0, [A0 + D4.w]
  727. 00000822  D07C 0080                add.w      D0, 0x80
  728. 00000826  4EBA 0014                jsr        [PC + 0x14 /* 0000083C */]
  729. 0000082A  04AD 0000 0030 FEF0      subi.l     [A5 - 0x110], 0x30 /* '0' */
  730. 00000832  04AD 0000 0030 FEF4      subi.l     [A5 - 0x10C], 0x30 /* '0' */
  731. 0000083A  4E75                     rts
  732. fn0000083C:
  733. 0000083C  42A7                     clr.l      -[A7]
  734. 0000083E  2F3C 5049 4354           move.l     -[A7], 0x50494354 /* 'PICT' */
  735. 00000844  3F00                     move.w     -[A7], D0
  736. 00000846  A9A0                     syscall    GetResource
  737. 00000848  486D FEF0                pea.l      [A5 - 0x110]
  738. 0000084C  A8F6                     syscall    DrawPicture
  739. 0000084E  4E75                     rts
  740. fn00000850:
  741. 00000850  47FA 00BC                lea.l      A3, [PC + 0xBC /* 0000090E, value 0x79017B, cstring "" */]
  742. 00000854  7807                     moveq.l    D4, 0x07
  743. label00000856:
  744. 00000856  4267                     clr.w      -[A7]
  745. 00000858  2F2D FE94                move.l     -[A7], [A5 - 0x16C]
  746. 0000085C  2F0B                     move.l     -[A7], A3
  747. 0000085E  A8AD                     syscall    PtInRect
  748. 00000860  504B                     addq.w     A3, 8
  749. 00000862  301F                     move.w     D0, [A7]+
  750. 00000864  56CC FFF0                dbne       D4, -0x12 /* 00000856 */
  751. 00000868  6600 0144                bne        +0x146 /* 000009AE */
  752. 0000086C  2B7C 000A 0025 FEF0      move.l     [A5 - 0x110], 0xA0025 /* '\n\0%' */
  753. 00000874  2B7C 004A 006A FEF4      move.l     [A5 - 0x10C], 0x4A006A /* 'J\0j' */
  754. 0000087C  4267                     clr.w      -[A7]
  755. 0000087E  2F2D FE94                move.l     -[A7], [A5 - 0x16C]
  756. 00000882  486D FEF0                pea.l      [A5 - 0x110]
  757. 00000886  A8AD                     syscall    PtInRect
  758. 00000888  301F                     move.w     D0, [A7]+
  759. 0000088A  6600 FB72                bne        -0x48C /* 000003FE */
  760. 0000088E  302D FE88                move.w     D0, [A5 - 0x178]
  761. 00000892  6762                     beq        +0x64 /* 000008F6 */
  762. 00000894  0C40 0003                cmpi.w     D0, 0x3
  763. 00000898  675C                     beq        +0x5E /* 000008F6 */
  764. 0000089A  0C40 0002                cmpi.w     D0, 0x2
  765. 0000089E  6730                     beq        +0x32 /* 000008D0 */
  766. 000008A0  41FA 00CC                lea.l      A0, [PC + 0xCC /* 0000096E, value 0xD6009B, cstring "" */]
  767. 000008A4  2B50 FE78                move.l     [A5 - 0x188], [A0]
  768. 000008A8  2B68 0004 FE7C           move.l     [A5 - 0x184], [A0 + 0x4]
  769. 000008AE  41FA 00C6                lea.l      A0, [PC + 0xC6 /* 00000976, value 0xD60153, cstring "" */]
  770. 000008B2  2B50 FE80                move.l     [A5 - 0x180], [A0]
  771. 000008B6  2B68 0004 FE84           move.l     [A5 - 0x17C], [A0 + 0x4]
  772. 000008BC  47FA 00A8                lea.l      A3, [PC + 0xA8 /* 00000966, value 0xD6012B, cstring "" */]
  773. 000008C0  6136                     bsr        +0x38 /* 000008F8 */
  774. 000008C2  6600 04B2                bne        +0x4B4 /* 00000D76 */
  775. 000008C6  302D FE88                move.w     D0, [A5 - 0x178]
  776. 000008CA  0C40 0002                cmpi.w     D0, 0x2
  777. 000008CE  6626                     bne        +0x28 /* 000008F6 */
  778. label000008D0:
  779. 000008D0  41FA 00CC                lea.l      A0, [PC + 0xCC /* 0000099E, value 0x9B, cstring "" */]
  780. 000008D4  2B50 FE78                move.l     [A5 - 0x188], [A0]
  781. 000008D8  2B68 0004 FE7C           move.l     [A5 - 0x184], [A0 + 0x4]
  782. 000008DE  41FA 00C6                lea.l      A0, [PC + 0xC6 /* 000009A6, value 0x153, cstring "" */]
  783. 000008E2  2B50 FE80                move.l     [A5 - 0x180], [A0]
  784. 000008E6  2B68 0004 FE84           move.l     [A5 - 0x17C], [A0 + 0x4]
  785. 000008EC  47FA 00A8                lea.l      A3, [PC + 0xA8 /* 00000996, value 0x12B, cstring "" */]
  786. 000008F0  6106                     bsr        +0x8 /* 000008F8 */
  787. 000008F2  6600 047C                bne        +0x47E /* 00000D70 */
  788. label000008F6:
  789. 000008F6  4E75                     rts
  790. fn000008F8:
  791. 000008F8  7803                     moveq.l    D4, 0x03
  792. label000008FA:
  793. 000008FA  4267                     clr.w      -[A7]
  794. 000008FC  2F2D FE94                move.l     -[A7], [A5 - 0x16C]
  795. 00000900  2F0B                     move.l     -[A7], A3
  796. 00000902  A8AD                     syscall    PtInRect
  797. 00000904  514B                     subq.w     A3, 8
  798. 00000906  301F                     move.w     D0, [A7]+
  799. 00000908  56CC FFF0                dbne       D4, -0x12 /* 000008FA */
  800. 0000090C  4E75                     rts
  801. 0000090E  0079 017B 009F 01A1      ori.w      [0x009F01A1], 0x17B
  802. 00000916  008B 014C 00B1           ori.l      A3, 0x14C00B1
  803. 0000091C  0172 0094                bchg       [A2 + D0.w - 0x108], D0
  804. 00000920  0118                     btst       [A0]+, D0
  805. 00000922  00BA 013E 0097 00E2      ori.l      [PC + 0xE2 /* 00000A06, value 0xFEF8670C */], 0x13E0097
  806. 0000092A  00BD 0108 0094           ori.l      <<invalid special address>>, 0x1080094
  807. 00000930  00AC 00BA 00D2 008B      ori.l      [A4 + 0x8B], 0xBA00D2
  808. 00000938  0078 00B1 009E           ori.w      [0x0000009E], 0xB1
  809. 0000093E  0079 0049 009F 006F      ori.w      [0x009F006F], 0x49 /* 'I' */
  810. 00000946  0054 00D0                ori.w      [A4], 0xD0
  811. 0000094A  007A 011A 00D6           ori.w      [PC + 0xD6 /* 00000A22, value 0x6000 '`\0', cstring "`" */], 0x11A
  812. 00000950  009B 012A 00C1           ori.l      [A3]+, 0x12A00C1
  813. 00000956  00D6                     .incomplete
  814. 00000958  00CB                     .incomplete
  815. 0000095A  012A 00F1                btst       [A2 + 0xF1], D0
  816. 0000095E  00D6                     .incomplete
  817. 00000960  00FB                     .incomplete
  818. 00000962  012A 0121                btst       [A2 + 0x121], D0
  819. 00000966  00D6                     .incomplete
  820. 00000968  012B 012A                btst       [A3 + 0x12A], D0
  821. 0000096C  0151                     bchg       [A1], D0
  822. 0000096E  00D6                     .incomplete
  823. 00000970  009B 012A 0151           ori.l      [A3]+, 0x12A0151
  824. 00000976  00D6                     .incomplete
  825. 00000978  0153                     bchg       [A3], D0
  826. 0000097A  012A 0179                btst       [A2 + 0x179], D0
  827. 0000097E  0000 009B                ori.b      D0, 0x9B
  828. 00000982  0054 00C1                ori.w      [A4], 0xC1
  829. 00000986  0000 00CB                ori.b      D0, 0xCB
  830. 0000098A  0054 00F1                ori.w      [A4], 0xF1
  831. 0000098E  0000 00FB                ori.b      D0, 0xFB
  832. 00000992  0054 0121                ori.w      [A4], 0x121
  833. 00000996  0000 012B                ori.b      D0, 0x2B /* '+' */
  834. 0000099A  0054 0151                ori.w      [A4], 0x151
  835. 0000099E  0000 009B                ori.b      D0, 0x9B
  836. 000009A2  0054 0151                ori.w      [A4], 0x151
  837. 000009A6  0000 0153                ori.b      D0, 0x53 /* 'S' */
  838. 000009AA  0054 0179                ori.w      [A4], 0x179
  839. fn000009AE:
  840. 000009AE  B87C 0000                cmp.w      D4, 0x0
  841. 000009B2  6700 0072                beq        +0x74 /* 00000A26 */
  842. 000009B6  B86D FCC4                cmp.w      D4, [A5 - 0x33C]
  843. 000009BA  6746                     beq        +0x48 /* 00000A02 */
  844. 000009BC  082D 0001 FEF8           btst.b     [A5 - 0x108], 0x1
  845. 000009C2  6716                     beq        +0x18 /* 000009DA */
  846. 000009C4  302D FE88                move.w     D0, [A5 - 0x178]
  847. 000009C8  6710                     beq        +0x12 /* 000009DA */
  848. 000009CA  0C40 0003                cmpi.w     D0, 0x3
  849. 000009CE  670A                     beq        +0xC /* 000009DA */
  850. 000009D0  092D FEFD                btst       [A5 - 0x103], D4
  851. 000009D4  6642                     bne        +0x44 /* 00000A18 */
  852. 000009D6  09ED                     .incomplete
  853. 000009D8  FEFD 302D                .extension 0xEFD <<F/2-3/7>> // unimplemented
  854. // begin alternate branch 000009DA-000009E4
  855. label000009DA:
  856. 000009DA  302D FCC4                move.w     D0, [A5 - 0x33C]
  857. 000009DE  B07C 0008                cmp.w      D0, 0x8
  858. 000009E2  6C08                     bge        +0xA /* 000009EC */
  859. // end alternate branch 000009DA-000009E4
  860. label000009DA: // (misaligned)
  861. 000009DC  FCC4 B07C                .extension 0xCC4 <<F/2-3/6>> // unimplemented
  862. 000009E0  0008 6C08                ori.b      A0, 0x8
  863. 000009E4  47FA FF28                lea.l      A3, [PC - 0xD8 /* 0000090E, value 0x79017B, cstring "" */]
  864. 000009E8  4EBA 0184                jsr        [PC + 0x184 /* 00000B6E */]
  865. label000009EC:
  866. 000009EC  3B44 FCC4                move.w     [A5 - 0x33C], D4
  867. fn000009F0:
  868. 000009F0  47FA FF1C                lea.l      A3, [PC - 0xE4 /* 0000090E, value 0x79017B, cstring "" */]
  869. 000009F4  3004                     move.w     D0, D4
  870. 000009F6  4EBA 0176                jsr        [PC + 0x176 /* 00000B6E */]
  871. 000009FA  4EBA 09C2                jsr        [PC + 0x9C2 /* 000013BE */]
  872. 000009FE  6000 FC86                bra        -0x378 /* 00000686 */
  873. label00000A02:
  874. 00000A02  082D 0001 FEF8           btst.b     [A5 - 0x108], 0x1
  875. 00000A08  670C                     beq        +0xE /* 00000A16 */
  876. 00000A0A  09ED                     .incomplete
  877. 00000A0C  FEFD 3B7C                .extension 0xEFD <<F/2-3/7>> // unimplemented
  878. 00000A10  0008 FCC4                ori.b      A0, 0xC4
  879. 00000A14  61DA                     bsr        -0x24 /* 000009F0 */
  880. label00000A16:
  881. 00000A16  4E75                     rts
  882. label00000A18:
  883. 00000A18  3004                     move.w     D0, D4
  884. 00000A1A  4EBA 0654                jsr        [PC + 0x654 /* 00001070 */]
  885. 00000A1E  303C 0009                move.w     D0, 0x9 /* '\t' */
  886. 00000A22  6000 0600                bra        +0x602 /* 00001024 */
  887. label00000A26:
  888. 00000A26  302D FE88                move.w     D0, [A5 - 0x178]
  889. 00000A2A  6700 10FC                beq        +0x10FE /* 00001B28 */
  890. 00000A2E  0C40 0002                cmpi.w     D0, 0x2
  891. 00000A32  6718                     beq        +0x1A /* 00000A4C */
  892. 00000A34  0C40 0003                cmpi.w     D0, 0x3
  893. 00000A38  674E                     beq        +0x50 /* 00000A88 */
  894. label00000A3A:
  895. 00000A3A  4EBA 015C                jsr        [PC + 0x15C /* 00000B98 */]
  896. 00000A3E  7004                     moveq.l    D0, 0x04
  897. 00000A40  4EBA 066A                jsr        [PC + 0x66A /* 000010AC */]
  898. 00000A44  082D 0007 FEF8           btst.b     [A5 - 0x108], 0x7
  899. 00000A4A  6628                     bne        +0x2A /* 00000A74 */
  900. label00000A4C:
  901. 00000A4C  3B7C 0003 FE88           move.w     [A5 - 0x178], 0x3
  902. 00000A52  4EBA 0064                jsr        [PC + 0x64 /* 00000AB8 */]
  903. 00000A56  4EBA FBDA                jsr        [PC - 0x426 /* 00000632 */]
  904. 00000A5A  4EBA 06BE                jsr        [PC + 0x6BE /* 0000111A */]
  905. 00000A5E  7005                     moveq.l    D0, 0x05
  906. 00000A60  4EBA 0640                jsr        [PC + 0x640 /* 000010A2 */]
  907. 00000A64  4EBA 0650                jsr        [PC + 0x650 /* 000010B6 */]
  908. 00000A68  4EBA 1064                jsr        [PC + 0x1064 /* 00001ACE */]
  909. 00000A6C  4EBA 0A48                jsr        [PC + 0xA48 /* 000014B6 */]
  910. 00000A70  6000 0126                bra        +0x128 /* 00000B98 */
  911. label00000A74:
  912. 00000A74  3B7C 0002 FE88           move.w     [A5 - 0x178], 0x2
  913. 00000A7A  2B6D FCCC FCC8           move.l     [A5 - 0x338], [A5 - 0x334]
  914. 00000A80  4EBA FBB0                jsr        [PC - 0x450 /* 00000632 */]
  915. 00000A84  6000 1048                bra        +0x104A /* 00001ACE */
  916. fn00000A88:
  917. 00000A88  4EBA 010E                jsr        [PC + 0x10E /* 00000B98 */]
  918. 00000A8C  426D FE88                clr.w      [A5 - 0x178]
  919. 00000A90  7005                     moveq.l    D0, 0x05
  920. 00000A92  4EBA 0618                jsr        [PC + 0x618 /* 000010AC */]
  921. 00000A96  7002                     moveq.l    D0, 0x02
  922. 00000A98  4EBA 0608                jsr        [PC + 0x608 /* 000010A2 */]
  923. 00000A9C  4EBA 0886                jsr        [PC + 0x886 /* 00001324 */]
  924. 00000AA0  4EBA FBE4                jsr        [PC - 0x41C /* 00000686 */]
  925. 00000AA4  4EBA FB8C                jsr        [PC - 0x474 /* 00000632 */]
  926. 00000AA8  4EBA 1024                jsr        [PC + 0x1024 /* 00001ACE */]
  927. 00000AAC  4EBA 0AF6                jsr        [PC + 0xAF6 /* 000015A4 */]
  928. 00000AB0  4EBA 090C                jsr        [PC + 0x90C /* 000013BE */]
  929. 00000AB4  6000 00E2                bra        +0xE4 /* 00000B98 */
  930. fn00000AB8:
  931. 00000AB8  202D FCCC                move.l     D0, [A5 - 0x334]
  932. 00000ABC  4EBA 007A                jsr        [PC + 0x7A /* 00000B38 */]
  933. 00000AC0  486D FCEC                pea.l      [A5 - 0x314]
  934. 00000AC4  4EBA 0100                jsr        [PC + 0x100 /* 00000BC6 */]
  935. 00000AC8  2B40 FCF8                move.l     [A5 - 0x308], D0
  936. 00000ACC  082D 0007 FEF8           btst.b     [A5 - 0x108], 0x7
  937. 00000AD2  6702                     beq        +0x4 /* 00000AD6 */
  938. 00000AD4  4E75                     rts
  939. label00000AD6:
  940. 00000AD6  486D FCF0                pea.l      [A5 - 0x310]
  941. 00000ADA  4EBA 00EA                jsr        [PC + 0xEA /* 00000BC6 */]
  942. 00000ADE  2B40 FCFC                move.l     [A5 - 0x304], D0
  943. 00000AE2  486D FCF4                pea.l      [A5 - 0x30C]
  944. 00000AE6  4EBA 00DE                jsr        [PC + 0xDE /* 00000BC6 */]
  945. 00000AEA  2B40 FD00                move.l     [A5 - 0x300], D0
  946. 00000AEE  2F2D FCF8                move.l     -[A7], [A5 - 0x308]
  947. 00000AF2  2F2D FCFC                move.l     -[A7], [A5 - 0x304]
  948. 00000AF6  4EBA 0244                jsr        [PC + 0x244 /* 00000D3C */]
  949. 00000AFA  0240 0005                andi.w     D0, 0x5
  950. 00000AFE  660C                     bne        +0xE /* 00000B0C */
  951. 00000B00  2B6D FCF0 FCEC           move.l     [A5 - 0x314], [A5 - 0x310]
  952. 00000B06  2B6D FCFC FCF8           move.l     [A5 - 0x308], [A5 - 0x304]
  953. label00000B0C:
  954. 00000B0C  2F2D FCF8                move.l     -[A7], [A5 - 0x308]
  955. 00000B10  2F2D FD00                move.l     -[A7], [A5 - 0x300]
  956. 00000B14  4EBA 0226                jsr        [PC + 0x226 /* 00000D3C */]
  957. 00000B18  0240 0005                andi.w     D0, 0x5
  958. 00000B1C  660C                     bne        +0xE /* 00000B2A */
  959. 00000B1E  2B6D FCF4 FCEC           move.l     [A5 - 0x314], [A5 - 0x30C]
  960. 00000B24  2B6D FD00 FCF8           move.l     [A5 - 0x308], [A5 - 0x300]
  961. label00000B2A:
  962. 00000B2A  2B6D FCEC FCC8           move.l     [A5 - 0x338], [A5 - 0x314]
  963. 00000B30  2B6D FCEC FCCC           move.l     [A5 - 0x334], [A5 - 0x314]
  964. 00000B36  4E75                     rts
  965. fn00000B38:
  966. 00000B38  2B40 FCEC                move.l     [A5 - 0x314], D0
  967. 00000B3C  2B40 FCF0                move.l     [A5 - 0x310], D0
  968. 00000B40  2B40 FCF4                move.l     [A5 - 0x30C], D0
  969. 00000B44  2B7C 0002 0103 FEEC      move.l     [A5 - 0x114], 0x20103
  970. 00000B4C  41ED FEEC                lea.l      A0, [A5 - 0x114]
  971. 00000B50  43ED FCF0                lea.l      A1, [A5 - 0x310]
  972. 00000B54  4EBA 0422                jsr        [PC + 0x422 /* 00000F78 */]
  973. 00000B58  2B7C 0003 0102 FEEC      move.l     [A5 - 0x114], 0x30102
  974. 00000B60  41ED FEEC                lea.l      A0, [A5 - 0x114]
  975. 00000B64  43ED FCF4                lea.l      A1, [A5 - 0x30C]
  976. 00000B68  4EBA 040E                jsr        [PC + 0x40E /* 00000F78 */]
  977. 00000B6C  4E75                     rts
  978. fn00000B6E:
  979. 00000B6E  7207                     moveq.l    D1, 0x07
  980. 00000B70  9240                     sub.w      D1, D0
  981. 00000B72  E749                     lsl        D1.w, 3
  982. 00000B74  2B73 1000 FEF0           move.l     [A5 - 0x110], [A3 + D1.w]
  983. 00000B7A  2B73 1004 FEF4           move.l     [A5 - 0x10C], [A3 + D1.w + 0x4]
  984. 00000B80  06AD 0004 0004 FEF0      addi.l     [A5 - 0x110], 0x40004
  985. 00000B88  04AD 0004 0004 FEF4      subi.l     [A5 - 0x10C], 0x40004
  986. 00000B90  486D FEF0                pea.l      [A5 - 0x110]
  987. 00000B94  A8BA                     syscall    InvertOval
  988. 00000B96  4E75                     rts
  989. fn00000B98:
  990. 00000B98  41FA FDAC                lea.l      A0, [PC - 0x254 /* 00000946, value 0x5400D0, cstring "" */]
  991. 00000B9C  2B50 FEF0                move.l     [A5 - 0x110], [A0]
  992. 00000BA0  2B68 0004 FEF4           move.l     [A5 - 0x10C], [A0 + 0x4]
  993. 00000BA6  06AD 0004 0004 FEF0      addi.l     [A5 - 0x110], 0x40004
  994. 00000BAE  04AD 0004 0004 FEF4      subi.l     [A5 - 0x10C], 0x40004
  995. 00000BB6  486D FEF0                pea.l      [A5 - 0x110]
  996. 00000BBA  3F3C 0012                move.w     -[A7], 0x12
  997. 00000BBE  3F3C 0012                move.w     -[A7], 0x12
  998. 00000BC2  A8B3                     syscall    InvertRoundRect
  999. 00000BC4  4E75                     rts
  1000. fn00000BC6:
  1001. 00000BC6  4EBA 010A                jsr        [PC + 0x10A /* 00000CD2 */]
  1002. 00000BCA  206F 0004                movea.l    A0, [A7 + 0x4]
  1003. 00000BCE  4EBA 0030                jsr        [PC + 0x30 /* 00000C00 */]
  1004. 00000BD2  3F00                     move.w     -[A7], D0
  1005. 00000BD4  5448                     addq.w     A0, 2
  1006. 00000BD6  4EBA 0028                jsr        [PC + 0x28 /* 00000C00 */]
  1007. 00000BDA  321F                     move.w     D1, [A7]+
  1008. 00000BDC  B240                     cmp.w      D1, D0
  1009. 00000BDE  630A                     bls        +0xC /* 00000BEA */
  1010. 00000BE0  4841                     swap.w     D1
  1011. 00000BE2  3200                     move.w     D1, D0
  1012. 00000BE4  2001                     move.l     D0, D1
  1013. 00000BE6  4281                     clr.l      D1
  1014. 00000BE8  6010                     bra        +0x12 /* 00000BFA */
  1015. label00000BEA:
  1016. 00000BEA  206F 0004                movea.l    A0, [A7 + 0x4]
  1017. 00000BEE  2410                     move.l     D2, [A0]
  1018. 00000BF0  4842                     swap.w     D2
  1019. 00000BF2  2082                     move.l     [A0], D2
  1020. 00000BF4  4840                     swap.w     D0
  1021. 00000BF6  3001                     move.w     D0, D1
  1022. 00000BF8  7201                     moveq.l    D1, 0x01
  1023. label00000BFA:
  1024. 00000BFA  205F                     movea.l    A0, [A7]+
  1025. 00000BFC  584F                     addq.w     A7, 4
  1026. 00000BFE  4ED0                     jmp        [A0]
  1027. fn00000C00:
  1028. 00000C00  43FA 00F0                lea.l      A1, [PC + 0xF0 /* 00000CF2, value 0x11140000 */]
  1029. 00000C04  700F                     moveq.l    D0, 0x0F
  1030. label00000C06:
  1031. 00000C06  3219                     move.w     D1, [A1]+
  1032. 00000C08  B250                     cmp.w      D1, [A0]
  1033. 00000C0A  57C8 FFFA                dbeq       D0, -0x8 /* 00000C06 */
  1034. 00000C0E  6608                     bne        +0xA /* 00000C18 */
  1035. 00000C10  E948                     lsl        D0.w, 4
  1036. 00000C12  0640 C050                addi.w     D0, 0xC050
  1037. 00000C16  4E75                     rts
  1038. label00000C18:
  1039. 00000C18  43FA 00F8                lea.l      A1, [PC + 0xF8 /* 00000D12, value 0xB000C, cstring "" */]
  1040. 00000C1C  7003                     moveq.l    D0, 0x03
  1041. label00000C1E:
  1042. 00000C1E  3219                     move.w     D1, [A1]+
  1043. 00000C20  B250                     cmp.w      D1, [A0]
  1044. 00000C22  57C8 FFFA                dbeq       D0, -0x8 /* 00000C1E */
  1045. 00000C26  660A                     bne        +0xC /* 00000C32 */
  1046. 00000C28  E248                     lsr        D0.w, 1
  1047. 00000C2A  E948                     lsl        D0.w, 4
  1048. 00000C2C  0640 B030                addi.w     D0, 0xB030
  1049. 00000C30  4E75                     rts
  1050. label00000C32:
  1051. 00000C32  43FA 00E6                lea.l      A1, [PC + 0xE6 /* 00000D1A, value 0x2000D, cstring "" */]
  1052. 00000C36  7005                     moveq.l    D0, 0x05
  1053. label00000C38:
  1054. 00000C38  3219                     move.w     D1, [A1]+
  1055. 00000C3A  B250                     cmp.w      D1, [A0]
  1056. 00000C3C  57C8 FFFA                dbeq       D0, -0x8 /* 00000C38 */
  1057. 00000C40  660C                     bne        +0xE /* 00000C4E */
  1058. 00000C42  80FC 0003                divu.w     D0, 0x3
  1059. 00000C46  E948                     lsl        D0.w, 4
  1060. 00000C48  0640 A010                addi.w     D0, 0xA010
  1061. 00000C4C  4E75                     rts
  1062. label00000C4E:
  1063. 00000C4E  4281                     clr.l      D1
  1064. 00000C50  1210                     move.b     D1, [A0]
  1065. 00000C52  7014                     moveq.l    D0, 0x14
  1066. 00000C54  9041                     sub.w      D0, D1
  1067. 00000C56  0C01 000C                cmpi.b     D1, 0xC
  1068. 00000C5A  6D1A                     blt        +0x1C /* 00000C76 */
  1069. 00000C5C  5200                     addq.b     D0, 1
  1070. 00000C5E  0C01 000E                cmpi.b     D1, 0xE
  1071. 00000C62  6D12                     blt        +0x14 /* 00000C76 */
  1072. 00000C64  5200                     addq.b     D0, 1
  1073. 00000C66  0C01 0010                cmpi.b     D1, 0x10
  1074. 00000C6A  6D0A                     blt        +0xC /* 00000C76 */
  1075. 00000C6C  5200                     addq.b     D0, 1
  1076. 00000C6E  0C01 0013                cmpi.b     D1, 0x13
  1077. 00000C72  6D02                     blt        +0x4 /* 00000C76 */
  1078. 00000C74  5200                     addq.b     D0, 1
  1079. label00000C76:
  1080. 00000C76  E948                     lsl        D0.w, 4
  1081. 00000C78  4281                     clr.l      D1
  1082. 00000C7A  4283                     clr.l      D3
  1083. 00000C7C  4EBA 002E                jsr        [PC + 0x2E /* 00000CAC */]
  1084. 00000C80  ED4B                     lsl        D3.w, 6
  1085. 00000C82  ED4B                     lsl        D3.w, 6
  1086. 00000C84  D043                     add.w      D0, D3
  1087. 00000C86  0C80 0000 3000           cmpi.l     D0, 0x3000 /* '0\0' */
  1088. 00000C8C  6C16                     bge        +0x18 /* 00000CA4 */
  1089. 00000C8E  7401                     moveq.l    D2, 0x01
  1090. 00000C90  2248                     movea.l    A1, A0
  1091. label00000C92:
  1092. 00000C92  1219                     move.b     D1, [A1]+
  1093. 00000C94  0C01 0011                cmpi.b     D1, 0x11
  1094. 00000C98  670C                     beq        +0xE /* 00000CA6 */
  1095. 00000C9A  0C01 0014                cmpi.b     D1, 0x14
  1096. 00000C9E  6706                     beq        +0x8 /* 00000CA6 */
  1097. 00000CA0  51CA FFF0                dbf        D2, -0x12 /* 00000C92 */
  1098. label00000CA4:
  1099. 00000CA4  4E75                     rts
  1100. label00000CA6:
  1101. 00000CA6  0640 7000                addi.w     D0, 0x7000 /* 'p\0' */
  1102. 00000CAA  4E75                     rts
  1103. fn00000CAC:
  1104. 00000CAC  43FA 0078                lea.l      A1, [PC + 0x78 /* 00000D26, value 0xC020804 */]
  1105. 00000CB0  2448                     movea.l    A2, A0
  1106. 00000CB2  4EBA 0004                jsr        [PC + 0x4 /* 00000CB8 */]
  1107. 00000CB6  524A                     addq.w     A2, 1
  1108. fn00000CB8:
  1109. 00000CB8  7414                     moveq.l    D2, 0x14
  1110. 00000CBA  1212                     move.b     D1, [A2]
  1111. label00000CBC:
  1112. 00000CBC  B202                     cmp.b      D1, D2
  1113. 00000CBE  57CA FFFC                dbeq       D2, -0x6 /* 00000CBC */
  1114. 00000CC2  D631 2000                add.b      D3, [A1 + D2.w]
  1115. 00000CC6  0C43 000A                cmpi.w     D3, 0xA /* '\n' */
  1116. 00000CCA  6D04                     blt        +0x6 /* 00000CD0 */
  1117. 00000CCC  0443 000A                subi.w     D3, 0xA /* '\n' */
  1118. label00000CD0:
  1119. 00000CD0  4E75                     rts
  1120. fn00000CD2:
  1121. 00000CD2  4240                     clr.w      D0
  1122. 00000CD4  4241                     clr.w      D1
  1123. 00000CD6  206F 0008                movea.l    A0, [A7 + 0x8]
  1124. 00000CDA  6100 0004                bsr        +0x6 /* 00000CE0 */
  1125. 00000CDE  5448                     addq.w     A0, 2
  1126. fn00000CE0:
  1127. 00000CE0  1010                     move.b     D0, [A0]
  1128. 00000CE2  1228 0001                move.b     D1, [A0 + 0x1]
  1129. 00000CE6  B240                     cmp.w      D1, D0
  1130. 00000CE8  6C06                     bge        +0x8 /* 00000CF0 */
  1131. 00000CEA  1081                     move.b     [A0], D1
  1132. 00000CEC  1140 0001                move.b     [A0 + 0x1], D0
  1133. label00000CF0:
  1134. 00000CF0  4E75                     rts
  1135. 00000CF2  1114                     move.b     -[A0], [A4]
  1136. 00000CF4  0000 0101                ori.b      D0, 0x1
  1137. 00000CF8  0202 0303                andi.b     D2, 0x3
  1138. 00000CFC  0404 0505                subi.b     D4, 0x5
  1139. 00000D00  0606 0707                addi.b     D6, 0x7
  1140. 00000D04  0808 0909                btst.b     A0, 0x9 /* '\t' */
  1141. 00000D08  0A0A 0B0C                xori.b     A2, 0xC
  1142. 00000D0C  0D0E                     btst       A6, D6
  1143. 00000D0E  0F10                     btst       [A0], D7
  1144. 00000D10  1213                     move.b     D1, [A3]
  1145. 00000D12  000B 000C                ori.b      A3, 0xC
  1146. 00000D16  010B                     btst       A3, D0
  1147. 00000D18  010C                     btst       A4, D0
  1148. 00000D1A  0002 000D                ori.b      D2, 0xD /* '\r' */
  1149. 00000D1E  000E 0102                ori.b      A6, 0x2
  1150. 00000D22  010D                     btst       A5, D0
  1151. 00000D24  010E                     btst       A6, D0
  1152. 00000D26  0C02 0804                cmpi.b     D2, 0x4
  1153. 00000D2A  0A06 040B                xori.b     D6, 0xB
  1154. 00000D2E  0A07 0609                xori.b     D7, 0x9 /* '\t' */
  1155. 00000D32  0908                     btst       A0, D4
  1156. 00000D34  0807 0706                btst.b     D7, 0x6
  1157. 00000D38  0505                     btst       D5, D2
  1158. 00000D3A  0600 4280                addi.b     D0, 0x80
  1159. // begin alternate branch 00000D3C-00000D3E
  1160. fn00000D3C:
  1161. 00000D3C  4280                     clr.l      D0
  1162. // end alternate branch 00000D3C-00000D3E
  1163. fn00000D3C: // (misaligned)
  1164. 00000D3E  4281                     clr.l      D1
  1165. 00000D40  4282                     clr.l      D2
  1166. 00000D42  342F 0004                move.w     D2, [A7 + 0x4]
  1167. 00000D46  322F 0008                move.w     D1, [A7 + 0x8]
  1168. 00000D4A  B481                     cmp.l      D2, D1
  1169. 00000D4C  6708                     beq        +0xA /* 00000D56 */
  1170. 00000D4E  6D04                     blt        +0x6 /* 00000D54 */
  1171. 00000D50  7002                     moveq.l    D0, 0x02
  1172. 00000D52  6002                     bra        +0x4 /* 00000D56 */
  1173. label00000D54:
  1174. 00000D54  7001                     moveq.l    D0, 0x01
  1175. label00000D56:
  1176. 00000D56  342F 0006                move.w     D2, [A7 + 0x6]
  1177. 00000D5A  322F 000A                move.w     D1, [A7 + 0xA]
  1178. 00000D5E  B481                     cmp.l      D2, D1
  1179. 00000D60  6708                     beq        +0xA /* 00000D6A */
  1180. 00000D62  6D04                     blt        +0x6 /* 00000D68 */
  1181. 00000D64  5040                     addq.w     D0, 8
  1182. 00000D66  6002                     bra        +0x4 /* 00000D6A */
  1183. label00000D68:
  1184. 00000D68  5880                     addq.l     D0, 4
  1185. label00000D6A:
  1186. 00000D6A  205F                     movea.l    A0, [A7]+
  1187. 00000D6C  504F                     addq.w     A7, 8
  1188. 00000D6E  4ED0                     jmp        [A0]
  1189. label00000D70:
  1190. 00000D70  41FA FC0C                lea.l      A0, [PC - 0x3F4 /* 0000097E, value 0x9B, cstring "" */]
  1191. 00000D74  6004                     bra        +0x6 /* 00000D7A */
  1192. label00000D76:
  1193. 00000D76  41FA FBD6                lea.l      A0, [PC - 0x42A /* 0000094E, value 0xD6009B, cstring "" */]
  1194. label00000D7A:
  1195. 00000D7A  226D FECA                movea.l    A1, [A5 - 0x136]
  1196. 00000D7E  236D FE78 0006           move.l     [A1 + 0x6], [A5 - 0x188]
  1197. 00000D84  202D FE7C                move.l     D0, [A5 - 0x184]
  1198. 00000D88  0680 0000 002B           addi.l     D0, 0x2B /* '+' */
  1199. 00000D8E  2340 000A                move.l     [A1 + 0xA], D0
  1200. 00000D92  226D FECE                movea.l    A1, [A5 - 0x132]
  1201. 00000D96  236D FE78 0006           move.l     [A1 + 0x6], [A5 - 0x188]
  1202. 00000D9C  236D FE7C 000A           move.l     [A1 + 0xA], [A5 - 0x184]
  1203. 00000DA2  3004                     move.w     D0, D4
  1204. 00000DA4  E748                     lsl        D0.w, 3
  1205. 00000DA6  2B70 0000 FEF0           move.l     [A5 - 0x110], [A0 + D0.w]
  1206. 00000DAC  2B70 0004 FEF4           move.l     [A5 - 0x10C], [A0 + D0.w + 0x4]
  1207. 00000DB2  2F2D FD50                move.l     -[A7], [A5 - 0x2B0]
  1208. 00000DB6  486D FEF0                pea.l      [A5 - 0x110]
  1209. 00000DBA  A8DF                     syscall    RectRgn
  1210. 00000DBC  2F2D FD54                move.l     -[A7], [A5 - 0x2AC]
  1211. 00000DC0  486D FE78                pea.l      [A5 - 0x188]
  1212. 00000DC4  A8DF                     syscall    RectRgn
  1213. 00000DC6  2F2D FD54                move.l     -[A7], [A5 - 0x2AC]
  1214. 00000DCA  2F2D FD50                move.l     -[A7], [A5 - 0x2B0]
  1215. 00000DCE  2F2D FD54                move.l     -[A7], [A5 - 0x2AC]
  1216. 00000DD2  A8E6                     syscall    DiffRgn
  1217. 00000DD4  206D FEC6                movea.l    A0, [A5 - 0x13A]
  1218. 00000DD8  4868 0002                pea.l      [A0 + 0x2]
  1219. 00000DDC  4868 0002                pea.l      [A0 + 0x2]
  1220. 00000DE0  4868 0002                pea.l      [A0 + 0x2]
  1221. 00000DE4  2F2D FECA                move.l     -[A7], [A5 - 0x136]
  1222. 00000DE8  486D FE78                pea.l      [A5 - 0x188]
  1223. 00000DEC  486D FE78                pea.l      [A5 - 0x188]
  1224. 00000DF0  4267                     clr.w      -[A7]
  1225. 00000DF2  2F2D FD54                move.l     -[A7], [A5 - 0x2AC]
  1226. 00000DF6  A8EC                     syscall    CopyBits
  1227. 00000DF8  2F2D FECA                move.l     -[A7], [A5 - 0x136]
  1228. 00000DFC  486D FEF0                pea.l      [A5 - 0x110]
  1229. 00000E00  486D FE80                pea.l      [A5 - 0x180]
  1230. 00000E04  4267                     clr.w      -[A7]
  1231. 00000E06  42A7                     clr.l      -[A7]
  1232. 00000E08  A8EC                     syscall    CopyBits
  1233. 00000E0A  2F2D FECE                move.l     -[A7], [A5 - 0x132]
  1234. 00000E0E  486D FE78                pea.l      [A5 - 0x188]
  1235. 00000E12  486D FE78                pea.l      [A5 - 0x188]
  1236. 00000E16  4267                     clr.w      -[A7]
  1237. 00000E18  42A7                     clr.l      -[A7]
  1238. 00000E1A  A8EC                     syscall    CopyBits
  1239. 00000E1C  4267                     clr.w      -[A7]
  1240. 00000E1E  A973                     syscall    StillDown
  1241. 00000E20  301F                     move.w     D0, [A7]+
  1242. 00000E22  6602                     bne        +0x4 /* 00000E26 */
  1243. 00000E24  4E75                     rts
  1244. label00000E26:
  1245. 00000E26  486D FEEC                pea.l      [A5 - 0x114]
  1246. 00000E2A  A972                     syscall    GetMouse
  1247. 00000E2C  4280                     clr.l      D0
  1248. 00000E2E  302D FEEE                move.w     D0, [A5 - 0x112]
  1249. 00000E32  906D FE96                sub.w      D0, [A5 - 0x16A]
  1250. 00000E36  2B6D FEEC FE94           move.l     [A5 - 0x16C], [A5 - 0x114]
  1251. 00000E3C  2B40 FEEC                move.l     [A5 - 0x114], D0
  1252. 00000E40  6700 00A0                beq        +0xA2 /* 00000EE2 */
  1253. 00000E44  2F2D FECA                move.l     -[A7], [A5 - 0x136]
  1254. 00000E48  2F2D FECE                move.l     -[A7], [A5 - 0x132]
  1255. 00000E4C  486D FEF0                pea.l      [A5 - 0x110]
  1256. 00000E50  486D FEF0                pea.l      [A5 - 0x110]
  1257. 00000E54  4267                     clr.w      -[A7]
  1258. 00000E56  42A7                     clr.l      -[A7]
  1259. 00000E58  A8EC                     syscall    CopyBits
  1260. 00000E5A  202D FEF0                move.l     D0, [A5 - 0x110]
  1261. 00000E5E  D06D FEEE                add.w      D0, [A5 - 0x112]
  1262. 00000E62  2B40 FEF0                move.l     [A5 - 0x110], D0
  1263. 00000E66  202D FEF4                move.l     D0, [A5 - 0x10C]
  1264. 00000E6A  D06D FEEE                add.w      D0, [A5 - 0x112]
  1265. 00000E6E  2B40 FEF4                move.l     [A5 - 0x10C], D0
  1266. 00000E72  302D FEF6                move.w     D0, [A5 - 0x10A]
  1267. 00000E76  0C40 0151                cmpi.w     D0, 0x151
  1268. 00000E7A  6F0C                     ble        +0xE /* 00000E88 */
  1269. 00000E7C  3B7C 0151 FEF6           move.w     [A5 - 0x10A], 0x151
  1270. 00000E82  3B7C 012B FEF2           move.w     [A5 - 0x10E], 0x12B
  1271. label00000E88:
  1272. 00000E88  0C40 00C3                cmpi.w     D0, 0xC3
  1273. 00000E8C  6C0C                     bge        +0xE /* 00000E9A */
  1274. 00000E8E  3B7C 00C1 FEF6           move.w     [A5 - 0x10A], 0xC1
  1275. 00000E94  3B7C 009B FEF2           move.w     [A5 - 0x10E], 0x9B
  1276. label00000E9A:
  1277. 00000E9A  A8DA                     syscall    OpenRgn
  1278. 00000E9C  486D FEF0                pea.l      [A5 - 0x110]
  1279. 00000EA0  3F3C 001B                move.w     -[A7], 0x1B
  1280. 00000EA4  3F3C 001B                move.w     -[A7], 0x1B
  1281. 00000EA8  A8B0                     syscall    FrameRoundRect
  1282. 00000EAA  2F2D FD50                move.l     -[A7], [A5 - 0x2B0]
  1283. 00000EAE  A8DB                     syscall    CloseRgn
  1284. 00000EB0  2F2D FECA                move.l     -[A7], [A5 - 0x136]
  1285. 00000EB4  2F2D FECE                move.l     -[A7], [A5 - 0x132]
  1286. 00000EB8  486D FE80                pea.l      [A5 - 0x180]
  1287. 00000EBC  486D FEF0                pea.l      [A5 - 0x110]
  1288. 00000EC0  4267                     clr.w      -[A7]
  1289. 00000EC2  2F2D FD50                move.l     -[A7], [A5 - 0x2B0]
  1290. 00000EC6  A8EC                     syscall    CopyBits
  1291. 00000EC8  2F2D FECE                move.l     -[A7], [A5 - 0x132]
  1292. 00000ECC  206D FEC6                movea.l    A0, [A5 - 0x13A]
  1293. 00000ED0  4868 0002                pea.l      [A0 + 0x2]
  1294. 00000ED4  486D FE78                pea.l      [A5 - 0x188]
  1295. 00000ED8  486D FE78                pea.l      [A5 - 0x188]
  1296. 00000EDC  4267                     clr.w      -[A7]
  1297. 00000EDE  42A7                     clr.l      -[A7]
  1298. 00000EE0  A8EC                     syscall    CopyBits
  1299. label00000EE2:
  1300. 00000EE2  4267                     clr.w      -[A7]
  1301. 00000EE4  A973                     syscall    StillDown
  1302. 00000EE6  301F                     move.w     D0, [A7]+
  1303. 00000EE8  6600 FF3C                bne        -0xC2 /* 00000E26 */
  1304. 00000EEC  206D FECA                movea.l    A0, [A5 - 0x136]
  1305. 00000EF0  41E8 000E                lea.l      A0, [A0 + 0xE]
  1306. 00000EF4  203C 0000 0276           move.l     D0, 0x276
  1307. label00000EFA:
  1308. 00000EFA  4298                     clr.l      [A0]+
  1309. 00000EFC  51C8 FFFC                dbf        D0, -0x6 /* 00000EFA */
  1310. 00000F00  4EBA 001C                jsr        [PC + 0x1C /* 00000F1E */]
  1311. 00000F04  486D FE78                pea.l      [A5 - 0x188]
  1312. 00000F08  A8A3                     syscall    EraseRect
  1313. 00000F0A  4A6D FE78                tst.w      [A5 - 0x188]
  1314. 00000F0E  6704                     beq        +0x6 /* 00000F14 */
  1315. 00000F10  6000 F774                bra        -0x88A /* 00000686 */
  1316. label00000F14:
  1317. 00000F14  2B6D FCCC FCC8           move.l     [A5 - 0x338], [A5 - 0x334]
  1318. 00000F1A  6000 F716                bra        -0x8E8 /* 00000632 */
  1319. fn00000F1E:
  1320. 00000F1E  302D FEF6                move.w     D0, [A5 - 0x10A]
  1321. 00000F22  D06D FEF2                add.w      D0, [A5 - 0x10E]
  1322. 00000F26  E248                     lsr        D0.w, 1
  1323. 00000F28  0C40 00C5                cmpi.w     D0, 0xC5
  1324. 00000F2C  6E04                     bgt        +0x6 /* 00000F32 */
  1325. 00000F2E  4245                     clr.w      D5
  1326. 00000F30  6016                     bra        +0x18 /* 00000F48 */
  1327. label00000F32:
  1328. 00000F32  0C40 00F5                cmpi.w     D0, 0xF5
  1329. 00000F36  6E04                     bgt        +0x6 /* 00000F3C */
  1330. 00000F38  7A01                     moveq.l    D5, 0x01
  1331. 00000F3A  600C                     bra        +0xE /* 00000F48 */
  1332. label00000F3C:
  1333. 00000F3C  0C40 0125                cmpi.w     D0, 0x125
  1334. 00000F40  6E04                     bgt        +0x6 /* 00000F46 */
  1335. 00000F42  7A02                     moveq.l    D5, 0x02
  1336. 00000F44  6002                     bra        +0x4 /* 00000F48 */
  1337. label00000F46:
  1338. 00000F46  7A03                     moveq.l    D5, 0x03
  1339. label00000F48:
  1340. 00000F48  B845                     cmp.w      D4, D5
  1341. 00000F4A  6602                     bne        +0x4 /* 00000F4E */
  1342. 00000F4C  4E75                     rts
  1343. label00000F4E:
  1344. 00000F4E  2B7C 0001 0203 FEEC      move.l     [A5 - 0x114], 0x10203
  1345. 00000F56  41ED FEEC                lea.l      A0, [A5 - 0x114]
  1346. 00000F5A  1184 5000                move.b     [A0 + D5.w], D4
  1347. 00000F5E  1185 4000                move.b     [A0 + D4.w], D5
  1348. 00000F62  43ED FCCC                lea.l      A1, [A5 - 0x334]
  1349. 00000F66  4280                     clr.l      D0
  1350. 00000F68  4A6D FE78                tst.w      [A5 - 0x188]
  1351. 00000F6C  670A                     beq        +0xC /* 00000F78 */
  1352. 00000F6E  302D FCC4                move.w     D0, [A5 - 0x33C]
  1353. 00000F72  E548                     lsl        D0.w, 2
  1354. 00000F74  43F1 0000                lea.l      A1, [A1 + D0.w]
  1355. fn00000F78:
  1356. 00000F78  45ED FEF0                lea.l      A2, [A5 - 0x110]
  1357. 00000F7C  4240                     clr.w      D0
  1358. 00000F7E  7203                     moveq.l    D1, 0x03
  1359. label00000F80:
  1360. 00000F80  1018                     move.b     D0, [A0]+
  1361. 00000F82  14F1 0000                move.b     [A2]+, [A1 + D0.w]
  1362. 00000F86  51C9 FFF8                dbf        D1, -0xA /* 00000F80 */
  1363. 00000F8A  22AD FEF0                move.l     [A1], [A5 - 0x110]
  1364. 00000F8E  4E75                     rts
  1365. label00000F90:
  1366. 00000F90  4A6D FE88                tst.w      [A5 - 0x178]
  1367. 00000F94  6704                     beq        +0x6 /* 00000F9A */
  1368. 00000F96  4EBA FAF0                jsr        [PC - 0x510 /* 00000A88 */]
  1369. label00000F9A:
  1370. 00000F9A  302D FCC4                move.w     D0, [A5 - 0x33C]
  1371. 00000F9E  4EBA 09D8                jsr        [PC + 0x9D8 /* 00001978 */]
  1372. 00000FA2  41FA 0006                lea.l      A0, [PC + 0x6 /* 00000FAA, value 0x60386042 '`8`B' */]
  1373. 00000FA6  4EF0 1000                jmp        [A0 + D1.w]
  1374. 00000FAA  6038                     bra        +0x3A /* 00000FE4 */
  1375. 00000FAC  6042                     bra        +0x44 /* 00000FF0 */
  1376. 00000FAE  603A                     bra        +0x3C /* 00000FEA */
  1377. 00000FB0  6030                     bra        +0x32 /* 00000FE2 */
  1378. 00000FB2  3F2D FCC4                move.w     -[A7], [A5 - 0x33C]
  1379. 00000FB6  3F3C 0001                move.w     -[A7], 0x1
  1380. 00000FBA  3F3C 0081                move.w     -[A7], 0x81
  1381. 00000FBE  4EBA 07FA                jsr        [PC + 0x7FA /* 000017BA */]
  1382. 00000FC2  3F3C 0001                move.w     -[A7], 0x1
  1383. 00000FC6  41ED FD58                lea.l      A0, [A5 - 0x2A8]
  1384. 00000FCA  A9EE                     syscall    Pack7/DecStr68K
  1385. 00000FCC  EB88                     lsl        D0, 5
  1386. 00000FCE  382D FCC4                move.w     D4, [A5 - 0x33C]
  1387. 00000FD2  4EBA 09D8                jsr        [PC + 0x9D8 /* 000019AC */]
  1388. 00000FD6  322D FCC4                move.w     D1, [A5 - 0x33C]
  1389. 00000FDA  6100 0086                bsr        +0x88 /* 00001062 */
  1390. 00000FDE  6100 03DE                bsr        +0x3E0 /* 000013BE */
  1391. label00000FE2:
  1392. 00000FE2  4E75                     rts
  1393. label00000FE4:
  1394. 00000FE4  303C 0005                move.w     D0, 0x5
  1395. 00000FE8  6036                     bra        +0x38 /* 00001020 */
  1396. label00000FEA:
  1397. 00000FEA  303C 0006                move.w     D0, 0x6
  1398. 00000FEE  6030                     bra        +0x32 /* 00001020 */
  1399. label00000FF0:
  1400. 00000FF0  302D FCC4                move.w     D0, [A5 - 0x33C]
  1401. 00000FF4  4EBA 007A                jsr        [PC + 0x7A /* 00001070 */]
  1402. 00000FF8  303C 000A                move.w     D0, 0xA /* '\n' */
  1403. 00000FFC  6130                     bsr        +0x32 /* 0000102E */
  1404. 00000FFE  0C41 0001                cmpi.w     D1, 0x1
  1405. 00001002  6702                     beq        +0x4 /* 00001006 */
  1406. 00001004  4E75                     rts
  1407. label00001006:
  1408. 00001006  2F2D FEE2                move.l     -[A7], [A5 - 0x11E]
  1409. 0000100A  3F2D FCC4                move.w     -[A7], [A5 - 0x33C]
  1410. 0000100E  3F3C FFFF                move.w     -[A7], 0xFFFF
  1411. 00001012  A945                     syscall    CheckItem
  1412. 00001014  302D FCC4                move.w     D0, [A5 - 0x33C]
  1413. 00001018  01ED                     .incomplete
  1414. 0000101A  FEF9 6000                .extension 0xEF9 <<F/2-3/7>> // unimplemented
  1415. 0000101E  FF72                     .extension 0xF72 <<F/4-5/7>> // unimplemented
  1416. label00001020:
  1417. 00001020  42AD FE58                clr.l      [A5 - 0x1A8]
  1418. fn00001024:
  1419. 00001024  615C                     bsr        +0x5E /* 00001082 */
  1420. 00001026  616A                     bsr        +0x6C /* 00001092 */
  1421. 00001028  303C 0082                move.w     D0, 0x82
  1422. 0000102C  600E                     bra        +0x10 /* 0000103C */
  1423. fn0000102E:
  1424. 0000102E  6152                     bsr        +0x54 /* 00001082 */
  1425. 00001030  302D FCC4                move.w     D0, [A5 - 0x33C]
  1426. 00001034  613A                     bsr        +0x3C /* 00001070 */
  1427. 00001036  615A                     bsr        +0x5C /* 00001092 */
  1428. 00001038  303C 008A                move.w     D0, 0x8A
  1429. label0000103C:
  1430. 0000103C  42A7                     clr.l      -[A7]
  1431. 0000103E  3F00                     move.w     -[A7], D0
  1432. 00001040  42A7                     clr.l      -[A7]
  1433. 00001042  2F3C FFFF FFFF           move.l     -[A7], 0xFFFFFFFF
  1434. 00001048  A97C                     syscall    GetNewDialog
  1435. 0000104A  4267                     clr.w      -[A7]
  1436. 0000104C  42A7                     clr.l      -[A7]
  1437. 0000104E  486F 0004                pea.l      [A7 + 0x4]
  1438. 00001052  A991                     syscall    ModalDialog
  1439. 00001054  321F                     move.w     D1, [A7]+
  1440. 00001056  201F                     move.l     D0, [A7]+
  1441. 00001058  3F01                     move.w     -[A7], D1
  1442. 0000105A  2F00                     move.l     -[A7], D0
  1443. 0000105C  A983                     syscall    DisposeDialog
  1444. 0000105E  321F                     move.w     D1, [A7]+
  1445. 00001060  4E75                     rts
  1446. fn00001062:
  1447. 00001062  41ED FD24                lea.l      A0, [A5 - 0x2DC]
  1448. 00001066  E349                     lsl        D1.w, 1
  1449. 00001068  6704                     beq        +0x6 /* 0000106E */
  1450. 0000106A  3180 1000                move.w     [A0 + D1.w], D0
  1451. label0000106E:
  1452. 0000106E  4E75                     rts
  1453. fn00001070:
  1454. 00001070  5240                     addq.w     D0, 1
  1455. 00001072  486D FE58                pea.l      [A5 - 0x1A8]
  1456. 00001076  3F3C 0081                move.w     -[A7], 0x81
  1457. 0000107A  3F00                     move.w     -[A7], D0
  1458. 0000107C  4EBA 0980                jsr        [PC + 0x980 /* 000019FE */]
  1459. 00001080  4E75                     rts
  1460. fn00001082:
  1461. 00001082  486D FD58                pea.l      [A5 - 0x2A8]
  1462. 00001086  3F3C 0082                move.w     -[A7], 0x82
  1463. 0000108A  3F00                     move.w     -[A7], D0
  1464. 0000108C  4EBA 0970                jsr        [PC + 0x970 /* 000019FE */]
  1465. 00001090  4E75                     rts
  1466. fn00001092:
  1467. 00001092  486D FE58                pea.l      [A5 - 0x1A8]
  1468. 00001096  486D FD58                pea.l      [A5 - 0x2A8]
  1469. 0000109A  42A7                     clr.l      -[A7]
  1470. 0000109C  42A7                     clr.l      -[A7]
  1471. 0000109E  A98B                     syscall    ParamText
  1472. 000010A0  4E75                     rts
  1473. fn000010A2:
  1474. 000010A2  2F2D FEDA                move.l     -[A7], [A5 - 0x126]
  1475. 000010A6  3F00                     move.w     -[A7], D0
  1476. 000010A8  A939                     syscall    EnableItem
  1477. 000010AA  4E75                     rts
  1478. fn000010AC:
  1479. 000010AC  2F2D FEDA                move.l     -[A7], [A5 - 0x126]
  1480. 000010B0  3F00                     move.w     -[A7], D0
  1481. 000010B2  A93A                     syscall    DisableItem
  1482. 000010B4  4E75                     rts
  1483. fn000010B6:
  1484. 000010B6  2F2D FEDA                move.l     -[A7], [A5 - 0x126]
  1485. 000010BA  3F3C 0001                move.w     -[A7], 0x1
  1486. 000010BE  A939                     syscall    EnableItem
  1487. 000010C0  2F2D FEDA                move.l     -[A7], [A5 - 0x126]
  1488. 000010C4  3F3C 0003                move.w     -[A7], 0x3
  1489. 000010C8  A939                     syscall    EnableItem
  1490. 000010CA  2F2D FEE2                move.l     -[A7], [A5 - 0x11E]
  1491. 000010CE  4267                     clr.w      -[A7]
  1492. 000010D0  A939                     syscall    EnableItem
  1493. 000010D2  2F2D FEDE                move.l     -[A7], [A5 - 0x122]
  1494. 000010D6  3F3C 0001                move.w     -[A7], 0x1
  1495. 000010DA  A939                     syscall    EnableItem
  1496. 000010DC  4E75                     rts
  1497. fn000010DE:
  1498. 000010DE  2F2D FEDA                move.l     -[A7], [A5 - 0x126]
  1499. 000010E2  3F3C 0001                move.w     -[A7], 0x1
  1500. 000010E6  A93A                     syscall    DisableItem
  1501. 000010E8  2F2D FEDA                move.l     -[A7], [A5 - 0x126]
  1502. 000010EC  3F3C 0003                move.w     -[A7], 0x3
  1503. 000010F0  A93A                     syscall    DisableItem
  1504. 000010F2  2F2D FEE2                move.l     -[A7], [A5 - 0x11E]
  1505. 000010F6  4267                     clr.w      -[A7]
  1506. 000010F8  A93A                     syscall    DisableItem
  1507. 000010FA  2F2D FEDE                move.l     -[A7], [A5 - 0x122]
  1508. 000010FE  3F3C 0001                move.w     -[A7], 0x1
  1509. 00001102  A93A                     syscall    DisableItem
  1510. 00001104  4E75                     rts
  1511. fn00001106:
  1512. 00001106  302D FCC4                move.w     D0, [A5 - 0x33C]
  1513. 0000110A  670A                     beq        +0xC /* 00001116 */
  1514. 0000110C  0C40 0008                cmpi.w     D0, 0x8
  1515. 00001110  6404                     bcc        +0x6 /* 00001116 */
  1516. 00001112  E548                     lsl        D0.w, 2
  1517. 00001114  4E75                     rts
  1518. label00001116:
  1519. 00001116  4280                     clr.l      D0
  1520. 00001118  4E75                     rts
  1521. fn0000111A:
  1522. 0000111A  48E7 0C00                movem.l    -[A7], D4,D5
  1523. 0000111E  322D FCC6                move.w     D1, [A5 - 0x33A]
  1524. 00001122  6718                     beq        +0x1A /* 0000113C */
  1525. 00001124  E549                     lsl        D1.w, 2
  1526. 00001126  41ED FCCC                lea.l      A0, [A5 - 0x334]
  1527. 0000112A  2B70 1000 FCEC           move.l     [A5 - 0x314], [A0 + D1.w]
  1528. 00001130  486D FCEC                pea.l      [A5 - 0x314]
  1529. 00001134  4EBA FA90                jsr        [PC - 0x570 /* 00000BC6 */]
  1530. 00001138  2B40 FCF8                move.l     [A5 - 0x308], D0
  1531. label0000113C:
  1532. 0000113C  3A3C 0007                move.w     D5, 0x7
  1533. label00001140:
  1534. 00001140  0B2D FEF9                btst       [A5 - 0x107], D5
  1535. 00001144  6700 00F4                beq        +0xF6 /* 0000123A */
  1536. 00001148  BA6D FCC6                cmp.w      D5, [A5 - 0x33A]
  1537. 0000114C  6700 00EC                beq        +0xEE /* 0000123A */
  1538. 00001150  3205                     move.w     D1, D5
  1539. 00001152  E549                     lsl        D1.w, 2
  1540. 00001154  41ED FCCC                lea.l      A0, [A5 - 0x334]
  1541. 00001158  2B70 1000 FCF0           move.l     [A5 - 0x310], [A0 + D1.w]
  1542. 0000115E  486D FCF0                pea.l      [A5 - 0x310]
  1543. 00001162  4EBA FA62                jsr        [PC - 0x59E /* 00000BC6 */]
  1544. 00001166  2F2D FCF8                move.l     -[A7], [A5 - 0x308]
  1545. 0000116A  2F00                     move.l     -[A7], D0
  1546. 0000116C  4EBA FBCE                jsr        [PC - 0x432 /* 00000D3C */]
  1547. 00001170  0C40 0001                cmpi.w     D0, 0x1
  1548. 00001174  6F1A                     ble        +0x1C /* 00001190 */
  1549. 00001176  0C40 0003                cmpi.w     D0, 0x3
  1550. 0000117A  6F0C                     ble        +0xE /* 00001188 */
  1551. 0000117C  0C40 0005                cmpi.w     D0, 0x5
  1552. 00001180  6F0E                     ble        +0x10 /* 00001190 */
  1553. 00001182  0C40 000A                cmpi.w     D0, 0xA /* '\n' */
  1554. 00001186  6744                     beq        +0x46 /* 000011CC */
  1555. label00001188:
  1556. 00001188  3F3C 000C                move.w     -[A7], 0xC
  1557. 0000118C  6000 0084                bra        +0x86 /* 00001212 */
  1558. label00001190:
  1559. 00001190  6100 0176                bsr        +0x178 /* 00001308 */
  1560. 00001194  D5B0 0000                add.l      [A0 + D0.w], D2
  1561. 00001198  95B0 1000                sub.l      [A0 + D1.w], D2
  1562. 0000119C  082D 0006 FEF8           btst.b     [A5 - 0x108], 0x6
  1563. 000011A2  670C                     beq        +0xE /* 000011B0 */
  1564. 000011A4  84FC 0014                divu.w     D2, 0x14
  1565. 000011A8  48C2                     ext.l      D2
  1566. 000011AA  95B0 0000                sub.l      [A0 + D0.w], D2
  1567. 000011AE  D590                     add.l      [A0], D2
  1568. label000011B0:
  1569. 000011B0  3005                     move.w     D0, D5
  1570. 000011B2  4EBA 046C                jsr        [PC + 0x46C /* 00001620 */]
  1571. 000011B6  082D 0003 FEF8           btst.b     [A5 - 0x108], 0x3
  1572. 000011BC  6708                     beq        +0xA /* 000011C6 */
  1573. 000011BE  3205                     move.w     D1, D5
  1574. 000011C0  4240                     clr.w      D0
  1575. 000011C2  4EBA FE9E                jsr        [PC - 0x162 /* 00001062 */]
  1576. label000011C6:
  1577. 000011C6  3F3C 000B                move.w     -[A7], 0xB
  1578. 000011CA  6046                     bra        +0x48 /* 00001212 */
  1579. label000011CC:
  1580. 000011CC  6100 013A                bsr        +0x13C /* 00001308 */
  1581. 000011D0  D5B0 1000                add.l      [A0 + D1.w], D2
  1582. 000011D4  95B0 0000                sub.l      [A0 + D0.w], D2
  1583. 000011D8  082D 0006 FEF8           btst.b     [A5 - 0x108], 0x6
  1584. 000011DE  670C                     beq        +0xE /* 000011EC */
  1585. 000011E0  84FC 0014                divu.w     D2, 0x14
  1586. 000011E4  48C2                     ext.l      D2
  1587. 000011E6  95B0 1000                sub.l      [A0 + D1.w], D2
  1588. 000011EA  D590                     add.l      [A0], D2
  1589. label000011EC:
  1590. 000011EC  2F02                     move.l     -[A7], D2
  1591. 000011EE  4EBA 0118                jsr        [PC + 0x118 /* 00001308 */]
  1592. 000011F2  D49F                     add.l      D2, [A7]+
  1593. 000011F4  082D 0003 FEF8           btst.b     [A5 - 0x108], 0x3
  1594. 000011FA  6708                     beq        +0xA /* 00001204 */
  1595. 000011FC  3002                     move.w     D0, D2
  1596. 000011FE  3205                     move.w     D1, D5
  1597. 00001200  4EBA FE60                jsr        [PC - 0x1A0 /* 00001062 */]
  1598. label00001204:
  1599. 00001204  EA4A                     lsr        D2.w, 5
  1600. 00001206  3005                     move.w     D0, D5
  1601. 00001208  2802                     move.l     D4, D2
  1602. 0000120A  4EBA 03D4                jsr        [PC + 0x3D4 /* 000015E0 */]
  1603. 0000120E  3F3C 000A                move.w     -[A7], 0xA /* '\n' */
  1604. label00001212:
  1605. 00001212  486D FD58                pea.l      [A5 - 0x2A8]
  1606. 00001216  3F3C 0083                move.w     -[A7], 0x83
  1607. 0000121A  3F05                     move.w     -[A7], D5
  1608. 0000121C  0657 0001                addi.w     [A7], 0x1
  1609. 00001220  4EBA 07DC                jsr        [PC + 0x7DC /* 000019FE */]
  1610. 00001224  301F                     move.w     D0, [A7]+
  1611. 00001226  486D FE58                pea.l      [A5 - 0x1A8]
  1612. 0000122A  3F3C 0081                move.w     -[A7], 0x81
  1613. 0000122E  3F00                     move.w     -[A7], D0
  1614. 00001230  4EBA 07CC                jsr        [PC + 0x7CC /* 000019FE */]
  1615. 00001234  4EBA 0730                jsr        [PC + 0x730 /* 00001966 */]
  1616. 00001238  612C                     bsr        +0x2E /* 00001266 */
  1617. label0000123A:
  1618. 0000123A  51CD FF04                dbf        D5, -0xFE /* 00001140 */
  1619. 0000123E  4CDF 0030                movem.l    D4,D5, [A7]+
  1620. 00001242  082D 0002 FEF8           btst.b     [A5 - 0x108], 0x2
  1621. 00001248  661A                     bne        +0x1C /* 00001264 */
  1622. 0000124A  082D 0003 FEF8           btst.b     [A5 - 0x108], 0x3
  1623. 00001250  6612                     bne        +0x14 /* 00001264 */
  1624. 00001252  7006                     moveq.l    D0, 0x06
  1625. 00001254  41ED FD24                lea.l      A0, [A5 - 0x2DC]
  1626. 00001258  4281                     clr.l      D1
  1627. label0000125A:
  1628. 0000125A  4270 1002                clr.w      [A0 + D1.w + 0x2]
  1629. 0000125E  5441                     addq.w     D1, 2
  1630. 00001260  51C8 FFF8                dbf        D0, -0xA /* 0000125A */
  1631. label00001264:
  1632. 00001264  4E75                     rts
  1633. fn00001266:
  1634. 00001266  4267                     clr.w      -[A7]
  1635. 00001268  486D FD58                pea.l      [A5 - 0x2A8]
  1636. 0000126C  A88C                     syscall    StringWidth
  1637. 0000126E  321F                     move.w     D1, [A7]+
  1638. 00001270  E249                     lsr        D1.w, 1
  1639. 00001272  3005                     move.w     D0, D5
  1640. 00001274  E548                     lsl        D0.w, 2
  1641. 00001276  41FA 0016                lea.l      A0, [PC + 0x16 /* 0000128E, value 0xF40086, cstring "" */]
  1642. 0000127A  3F30 0000                move.w     -[A7], [A0 + D0.w]
  1643. 0000127E  9357                     sub.w      [A7], D1
  1644. 00001280  3F30 0002                move.w     -[A7], [A0 + D0.w + 0x2]
  1645. 00001284  A893                     syscall    MoveTo
  1646. 00001286  486D FD58                pea.l      [A5 - 0x2A8]
  1647. 0000128A  A884                     syscall    DrawString
  1648. 0000128C  4E75                     rts
  1649. 0000128E  00F4                     .incomplete
  1650. 00001290  0086 005C 0075           ori.l      D6, 0x5C0075 /* '\\\0u' */
  1651. 00001296  008A 0086 00BE           ori.l      A2, 0x8600BE
  1652. 0000129C  0090 00F4 0095           ori.l      [A0], 0xF40095
  1653. 000012A2  012A 0090                btst       [A2 + 0x90], D0
  1654. 000012A6  015E                     bchg       [A6]+, D0
  1655. 000012A8  0086 018D 0075           ori.l      D6, 0x18D0075
  1656. 000012AE  01A0                     bclr       -[A0], D0
  1657. 000012B0  0122                     btst       -[A2], D0
  1658. fn000012B2:
  1659. 000012B2  3003                     move.w     D0, D3
  1660. 000012B4  6722                     beq        +0x24 /* 000012D8 */
  1661. 000012B6  E548                     lsl        D0.w, 2
  1662. 000012B8  41FA FFD4                lea.l      A0, [PC - 0x2C /* 0000128E, value 0xF40086, cstring "" */]
  1663. 000012BC  2030 0000                move.l     D0, [A0 + D0.w]
  1664. 000012C0  4840                     swap.w     D0
  1665. 000012C2  D0BC 0002 001C           add.l      D0, 0x2001C
  1666. 000012C8  2B40 FEF4                move.l     [A5 - 0x10C], D0
  1667. 000012CC  90BC 000C 0038           sub.l      D0, 0xC0038
  1668. 000012D2  2B40 FEF0                move.l     [A5 - 0x110], D0
  1669. 000012D6  601C                     bra        +0x1E /* 000012F4 */
  1670. label000012D8:
  1671. 000012D8  41FA FFB4                lea.l      A0, [PC - 0x4C /* 0000128E, value 0xF40086, cstring "" */]
  1672. 000012DC  2010                     move.l     D0, [A0]
  1673. 000012DE  4840                     swap.w     D0
  1674. 000012E0  D0BC 0002 0040           add.l      D0, 0x20040
  1675. 000012E6  2B40 FEF4                move.l     [A5 - 0x10C], D0
  1676. 000012EA  0480 000E 0080           subi.l     D0, 0xE0080
  1677. 000012F0  2B40 FEF0                move.l     [A5 - 0x110], D0
  1678. label000012F4:
  1679. 000012F4  486D FEF0                pea.l      [A5 - 0x110]
  1680. 000012F8  A8A3                     syscall    EraseRect
  1681. 000012FA  4E75                     rts
  1682. fn000012FC:
  1683. 000012FC  7607                     moveq.l    D3, 0x07
  1684. label000012FE:
  1685. 000012FE  4EBA FFB2                jsr        [PC - 0x4E /* 000012B2 */]
  1686. 00001302  51CB FFFA                dbf        D3, -0x8 /* 000012FE */
  1687. 00001306  4E75                     rts
  1688. fn00001308:
  1689. 00001308  302D FCC6                move.w     D0, [A5 - 0x33A]
  1690. 0000130C  E548                     lsl        D0.w, 2
  1691. 0000130E  41ED FD04                lea.l      A0, [A5 - 0x2FC]
  1692. 00001312  3205                     move.w     D1, D5
  1693. 00001314  E349                     lsl        D1.w, 1
  1694. 00001316  43ED FD24                lea.l      A1, [A5 - 0x2DC]
  1695. 0000131A  4282                     clr.l      D2
  1696. 0000131C  3431 1000                move.w     D2, [A1 + D1.w]
  1697. 00001320  E349                     lsl        D1.w, 1
  1698. 00001322  4E75                     rts
  1699. fn00001324:
  1700. 00001324  4EBA FFD6                jsr        [PC - 0x2A /* 000012FC */]
  1701. 00001328  48E7 1400                movem.l    -[A7], D3,D5
  1702. 0000132C  082D 0004 FEF8           btst.b     [A5 - 0x108], 0x4
  1703. 00001332  662A                     bne        +0x2C /* 0000135E */
  1704. 00001334  612E                     bsr        +0x30 /* 00001364 */
  1705. label00001336:
  1706. 00001336  526D FCC6                addq.w     [A5 - 0x33A], 1
  1707. 0000133A  026D 0007 FCC6           andi.w     [A5 - 0x33A], 0x7
  1708. 00001340  302D FCC6                move.w     D0, [A5 - 0x33A]
  1709. 00001344  012D FEF9                btst       [A5 - 0x107], D0
  1710. 00001348  67EC                     beq        -0x12 /* 00001336 */
  1711. 0000134A  6154                     bsr        +0x56 /* 000013A0 */
  1712. 0000134C  6100 02CE                bsr        +0x2D0 /* 0000161C */
  1713. 00001350  302D FCC6                move.w     D0, [A5 - 0x33A]
  1714. 00001354  B06D FCC4                cmp.w      D0, [A5 - 0x33C]
  1715. 00001358  6604                     bne        +0x6 /* 0000135E */
  1716. 0000135A  4EBA 0062                jsr        [PC + 0x62 /* 000013BE */]
  1717. label0000135E:
  1718. 0000135E  4CDF 0028                movem.l    D3,D5, [A7]+
  1719. 00001362  4E75                     rts
  1720. fn00001364:
  1721. 00001364  362D FCC6                move.w     D3, [A5 - 0x33A]
  1722. 00001368  660A                     bne        +0xC /* 00001374 */
  1723. 0000136A  4240                     clr.w      D0
  1724. 0000136C  383C 0005                move.w     D4, 0x5
  1725. 00001370  4EBA 026E                jsr        [PC + 0x26E /* 000015E0 */]
  1726. label00001374:
  1727. 00001374  4EBA FF3C                jsr        [PC - 0xC4 /* 000012B2 */]
  1728. 00001378  302D FCC6                move.w     D0, [A5 - 0x33A]
  1729. 0000137C  6720                     beq        +0x22 /* 0000139E */
  1730. 0000137E  E348                     lsl        D0.w, 1
  1731. 00001380  41ED FD24                lea.l      A0, [A5 - 0x2DC]
  1732. 00001384  3830 0000                move.w     D4, [A0 + D0.w]
  1733. 00001388  EA4C                     lsr        D4.w, 5
  1734. 0000138A  302D FCC6                move.w     D0, [A5 - 0x33A]
  1735. 0000138E  6100 0250                bsr        +0x252 /* 000015E0 */
  1736. 00001392  302D FCC6                move.w     D0, [A5 - 0x33A]
  1737. 00001396  B06D FCC4                cmp.w      D0, [A5 - 0x33C]
  1738. 0000139A  6602                     bne        +0x4 /* 0000139E */
  1739. 0000139C  6120                     bsr        +0x22 /* 000013BE */
  1740. label0000139E:
  1741. 0000139E  4E75                     rts
  1742. fn000013A0:
  1743. 000013A0  2F05                     move.l     -[A7], D5
  1744. 000013A2  486D FD58                pea.l      [A5 - 0x2A8]
  1745. 000013A6  3F3C 0081                move.w     -[A7], 0x81
  1746. 000013AA  3F3C 0009                move.w     -[A7], 0x9 /* '\t' */
  1747. 000013AE  4EBA 064E                jsr        [PC + 0x64E /* 000019FE */]
  1748. 000013B2  3A2D FCC6                move.w     D5, [A5 - 0x33A]
  1749. 000013B6  4EBA FEAE                jsr        [PC - 0x152 /* 00001266 */]
  1750. 000013BA  2A1F                     move.l     D5, [A7]+
  1751. 000013BC  4E75                     rts
  1752. fn000013BE:
  1753. 000013BE  4EBA 00F6                jsr        [PC + 0xF6 /* 000014B6 */]
  1754. 000013C2  4EBA FD42                jsr        [PC - 0x2BE /* 00001106 */]
  1755. 000013C6  6700 00C8                beq        +0xCA /* 00001490 */
  1756. 000013CA  48E7 1C00                movem.l    -[A7], D3,D4,D5
  1757. 000013CE  41ED FD04                lea.l      A0, [A5 - 0x2FC]
  1758. 000013D2  2630 0000                move.l     D3, [A0 + D0.w]
  1759. 000013D6  EA8B                     lsr        D3, 5
  1760. 000013D8  41ED FD24                lea.l      A0, [A5 - 0x2DC]
  1761. 000013DC  E248                     lsr        D0.w, 1
  1762. 000013DE  3830 0000                move.w     D4, [A0 + D0.w]
  1763. 000013E2  EA4C                     lsr        D4.w, 5
  1764. 000013E4  48C4                     ext.l      D4
  1765. 000013E6  486D FD58                pea.l      [A5 - 0x2A8]
  1766. 000013EA  3F3C 0081                move.w     -[A7], 0x81
  1767. 000013EE  3F2D FCC4                move.w     -[A7], [A5 - 0x33C]
  1768. 000013F2  5257                     addq.w     [A7], 1
  1769. 000013F4  4EBA 0608                jsr        [PC + 0x608 /* 000019FE */]
  1770. 000013F8  302D FCC4                move.w     D0, [A5 - 0x33C]
  1771. 000013FC  012D FEF9                btst       [A5 - 0x107], D0
  1772. 00001400  661A                     bne        +0x1C /* 0000141C */
  1773. 00001402  486D FD58                pea.l      [A5 - 0x2A8]
  1774. 00001406  487A 008F                pea.l      [PC + 0x8F /* 00001497, value 0xE697320, pstring "is not active." */]
  1775. 0000140A  486D FD58                pea.l      [A5 - 0x2A8]
  1776. 0000140E  4EBA 0650                jsr        [PC + 0x650 /* 00001A60 */]
  1777. 00001412  7A08                     moveq.l    D5, 0x08
  1778. 00001414  4EBA FE50                jsr        [PC - 0x1B0 /* 00001266 */]
  1779. 00001418  6000 0072                bra        +0x74 /* 0000148C */
  1780. label0000141C:
  1781. 0000141C  2003                     move.l     D0, D3
  1782. 0000141E  41ED FE58                lea.l      A0, [A5 - 0x1A8]
  1783. 00001422  4267                     clr.w      -[A7]
  1784. 00001424  A9EE                     syscall    Pack7/DecStr68K
  1785. 00001426  486D FD58                pea.l      [A5 - 0x2A8]
  1786. 0000142A  487A 0066                pea.l      [PC + 0x66 /* 00001492, value 0x4686173, pstring "has " */]
  1787. 0000142E  486D FD58                pea.l      [A5 - 0x2A8]
  1788. 00001432  4EBA 062C                jsr        [PC + 0x62C /* 00001A60 */]
  1789. 00001436  4EBA 052E                jsr        [PC + 0x52E /* 00001966 */]
  1790. 0000143A  7A08                     moveq.l    D5, 0x08
  1791. 0000143C  4EBA FE28                jsr        [PC - 0x1D8 /* 00001266 */]
  1792. 00001440  302D FCC4                move.w     D0, [A5 - 0x33C]
  1793. 00001444  B06D FCC6                cmp.w      D0, [A5 - 0x33A]
  1794. 00001448  6738                     beq        +0x3A /* 00001482 */
  1795. 0000144A  B644                     cmp.w      D3, D4
  1796. 0000144C  6D34                     blt        +0x36 /* 00001482 */
  1797. 0000144E  9644                     sub.w      D3, D4
  1798. 00001450  6100 018E                bsr        +0x190 /* 000015E0 */
  1799. 00001454  1B7C 0008 FD58           move.b     [A5 - 0x2A8], 0x8
  1800. 0000145A  486D FD58                pea.l      [A5 - 0x2A8]
  1801. 0000145E  487A 0046                pea.l      [PC + 0x46 /* 000014A6, value 0xE2C2079, pstring ", your bet is " */]
  1802. 00001462  486D FD58                pea.l      [A5 - 0x2A8]
  1803. 00001466  4EBA 05F8                jsr        [PC + 0x5F8 /* 00001A60 */]
  1804. 0000146A  3004                     move.w     D0, D4
  1805. 0000146C  48C0                     ext.l      D0
  1806. 0000146E  41ED FE58                lea.l      A0, [A5 - 0x1A8]
  1807. 00001472  4267                     clr.w      -[A7]
  1808. 00001474  A9EE                     syscall    Pack7/DecStr68K
  1809. 00001476  4EBA 04EE                jsr        [PC + 0x4EE /* 00001966 */]
  1810. 0000147A  43FA 005E                lea.l      A1, [PC + 0x5E /* 000014DA, value 0x1000010 */]
  1811. 0000147E  4EBA 068E                jsr        [PC + 0x68E /* 00001B0E */]
  1812. label00001482:
  1813. 00001482  2B7C 0110 01B0 FEEC      move.l     [A5 - 0x114], 0x11001B0
  1814. 0000148A  616E                     bsr        +0x70 /* 000014FA */
  1815. label0000148C:
  1816. 0000148C  4CDF 0038                movem.l    D3,D4,D5, [A7]+
  1817. label00001490:
  1818. 00001490  4E75                     rts
  1819. 00001492  0468 6173 200E           subi.w     [A0 + 0x200E], 0x6173 /* 'as' */
  1820. 00001498  6973                     bvs        +0x75 /* 0000150D */
  1821. 0000149A  206E 6F74                movea.l    A0, [A6 + 0x6F74]
  1822. 0000149E  2061                     movea.l    A0, -[A1]
  1823. 000014A0  6374                     bls        +0x76 /* 00001516 */
  1824. 000014A2  6976                     bvs        +0x78 /* 0000151A */
  1825. 000014A4  652E                     bcs        +0x30 /* 000014D4 */
  1826. 000014A6  0E2C 2079 6F75           .invalid.b [A4 + 0x6F75], 0x79 /* 'y' */ // invalid immediate operation
  1827. 000014AC  7220                     moveq.l    D1, 0x20
  1828. 000014AE  6265                     bhi        +0x67 /* 00001515 */
  1829. 000014B0  7420                     moveq.l    D2, 0x20
  1830. 000014B2  6973                     bvs        +0x75 /* 00001527 */
  1831. 000014B4  2000                     move.l     D0, D0
  1832. fn000014B6:
  1833. 000014B6  487A 0012                pea.l      [PC + 0x12 /* 000014CA, value 0xC00190, cstring "" */]
  1834. 000014BA  A8A3                     syscall    EraseRect
  1835. 000014BC  487A 0014                pea.l      [PC + 0x14 /* 000014D2, value 0x1150155 */]
  1836. 000014C0  A8A3                     syscall    EraseRect
  1837. 000014C2  487A 0016                pea.l      [PC + 0x16 /* 000014DA, value 0x1000010 */]
  1838. 000014C6  A8A3                     syscall    EraseRect
  1839. 000014C8  4E75                     rts
  1840. 000014CA  00C0                     .incomplete
  1841. 000014CC  0190                     bclr       [A0], D0
  1842. 000014CE  0130 01D0                btst       [], D0
  1843. 000014D2  0115                     btst       [A5], D0
  1844. label000014D4:
  1845. 000014D4  0155                     bchg       [A5], D0
  1846. 000014D6  0125                     btst       -[A5], D0
  1847. 000014D8  01F0                     .incomplete
  1848. 000014DA  0100                     btst       D0, D0
  1849. 000014DC  0010 0120                ori.b      [A0], 0x20 /* ' ' */
  1850. 000014E0  0088 2B6D FEEC           ori.l      A0, 0x2B6DFEEC
  1851. // begin alternate branch 000014E2-000014F2
  1852. fn000014E2:
  1853. 000014E2  2B6D FEEC FEF0           move.l     [A5 - 0x110], [A5 - 0x114]
  1854. 000014E8  5B6D FEF0                subq.w     [A5 - 0x110], 5
  1855. 000014EC  046D 000E FEF2           subi.w     [A5 - 0x10E], 0xE
  1856. // end alternate branch 000014E2-000014F2
  1857. fn000014E2: // (misaligned)
  1858. 000014E6  FEF0 5B6D                .extension 0xEF0 <<F/2-3/7>> // unimplemented
  1859. 000014EA  FEF0 046D                .extension 0xEF0 <<F/2-3/7>> // unimplemented
  1860. 000014EE  000E FEF2                ori.b      A6, 0xF2
  1861. 000014F2  2B6D FEEC FEF4           move.l     [A5 - 0x10C], [A5 - 0x114]
  1862. 000014F8  4E75                     rts
  1863. fn000014FA:
  1864. 000014FA  48E7 0930                movem.l    -[A7], D4,D7,A2,A3
  1865. 000014FE  594F                     subq.w     A7, 4
  1866. 00001500  4EBA 0040                jsr        [PC + 0x40 /* 00001542 */]
  1867. 00001504  046D 0010 FEEE           subi.w     [A5 - 0x112], 0x10
  1868. 0000150A  45FA 002E                lea.l      A2, [PC + 0x2E /* 0000153A, value 0xFFF00000 */]
  1869. 0000150E  264F                     movea.l    A3, A7
  1870. 00001510  7803                     moveq.l    D4, 0x03
  1871. label00001512:
  1872. 00001512  61CE                     bsr        -0x30 /* 000014E2 */
  1873. 00001514  3E1A                     move.w     D7, [A2]+
  1874. label00001516:
  1875. 00001516  4283                     clr.l      D3
  1876. 00001518  161B                     move.b     D3, [A3]+
  1877. label0000151A:
  1878. 0000151A  670C                     beq        +0xE /* 00001528 */
  1879. 0000151C  6100 0060                bsr        +0x62 /* 0000157E */
  1880. 00001520  066D 0010 FEEE           addi.w     [A5 - 0x112], 0x10
  1881. 00001526  6006                     bra        +0x8 /* 0000152E */
  1882. label00001528:
  1883. 00001528  066D 0008 FEEE           addi.w     [A5 - 0x112], 0x8
  1884. label0000152E:
  1885. 0000152E  51CC FFE2                dbf        D4, -0x20 /* 00001512 */
  1886. 00001532  584F                     addq.w     A7, 4
  1887. 00001534  4CDF 0C90                movem.l    D4,D7,A2,A3, [A7]+
  1888. 00001538  4E75                     rts
  1889. 0000153A  FFF0                     .invalid   <<F/7/7>>
  1890. 0000153C  0000 FFF8                ori.b      D0, 0xF8
  1891. 00001540  0010 41EF                ori.b      [A0], 0xEF
  1892. // begin alternate branch 00001542-0000154C
  1893. fn00001542:
  1894. 00001542  41EF 0004                lea.l      A0, [A7 + 0x4]
  1895. 00001546  203C 0000 03E8           move.l     D0, 0x3E8
  1896. // end alternate branch 00001542-0000154C
  1897. fn00001542: // (misaligned)
  1898. 00001544  0004 203C                ori.b      D4, 0x3C /* '<' */
  1899. 00001548  0000 03E8                ori.b      D0, 0xE8
  1900. 0000154C  7202                     moveq.l    D1, 0x02
  1901. label0000154E:
  1902. 0000154E  86C0                     divu.w     D3, D0
  1903. 00001550  10C3                     move.b     [A0]+, D3
  1904. 00001552  4843                     swap.w     D3
  1905. 00001554  48C3                     ext.l      D3
  1906. 00001556  80FC 000A                divu.w     D0, 0xA /* '\n' */
  1907. 0000155A  51C9 FFF2                dbf        D1, -0x10 /* 0000154E */
  1908. 0000155E  10C3                     move.b     [A0]+, D3
  1909. 00001560  5948                     subq.w     A0, 4
  1910. 00001562  7202                     moveq.l    D1, 0x02
  1911. label00001564:
  1912. 00001564  4A10                     tst.b      [A0]
  1913. 00001566  670E                     beq        +0x10 /* 00001576 */
  1914. 00001568  4A28 0001                tst.b      [A0 + 0x1]
  1915. 0000156C  6608                     bne        +0xA /* 00001576 */
  1916. 0000156E  5310                     subq.b     [A0], 1
  1917. 00001570  0628 000A 0001           addi.b     [A0 + 0x1], 0xA /* '\n' */
  1918. label00001576:
  1919. 00001576  5248                     addq.w     A0, 1
  1920. 00001578  51C9 FFEA                dbf        D1, -0x18 /* 00001564 */
  1921. 0000157C  4E75                     rts
  1922. fn0000157E:
  1923. 0000157E  601E                     bra        +0x20 /* 0000159E */
  1924. label00001580:
  1925. 00001580  486D FEF0                pea.l      [A5 - 0x110]
  1926. 00001584  2055                     movea.l    A0, [A5]
  1927. 00001586  4870 70E8                pea.l      [A0 + D7.w - 0x24]
  1928. 0000158A  A8BB                     syscall    FillOval
  1929. 0000158C  486D FEF0                pea.l      [A5 - 0x110]
  1930. 00001590  A8B7                     syscall    FrameOval
  1931. 00001592  046D 0002 FEF0           subi.w     [A5 - 0x110], 0x2
  1932. 00001598  046D 0002 FEF4           subi.w     [A5 - 0x10C], 0x2
  1933. label0000159E:
  1934. 0000159E  51CB FFE0                dbf        D3, -0x22 /* 00001580 */
  1935. 000015A2  4E75                     rts
  1936. fn000015A4:
  1937. 000015A4  7607                     moveq.l    D3, 0x07
  1938. label000015A6:
  1939. 000015A6  3003                     move.w     D0, D3
  1940. 000015A8  012D FEF9                btst       [A5 - 0x107], D0
  1941. 000015AC  672C                     beq        +0x2E /* 000015DA */
  1942. 000015AE  B06D FCC6                cmp.w      D0, [A5 - 0x33A]
  1943. 000015B2  6726                     beq        +0x28 /* 000015DA */
  1944. 000015B4  E348                     lsl        D0.w, 1
  1945. 000015B6  41ED FD24                lea.l      A0, [A5 - 0x2DC]
  1946. 000015BA  3830 0000                move.w     D4, [A0 + D0.w]
  1947. 000015BE  48C4                     ext.l      D4
  1948. 000015C0  3200                     move.w     D1, D0
  1949. 000015C2  E349                     lsl        D1.w, 1
  1950. 000015C4  43ED FD04                lea.l      A1, [A5 - 0x2FC]
  1951. 000015C8  B8B1 1000                cmp.l      D4, [A1 + D1.w]
  1952. 000015CC  6F06                     ble        +0x8 /* 000015D4 */
  1953. 000015CE  4270 0000                clr.w      [A0 + D0.w]
  1954. 000015D2  4244                     clr.w      D4
  1955. label000015D4:
  1956. 000015D4  EA4C                     lsr        D4.w, 5
  1957. 000015D6  3003                     move.w     D0, D3
  1958. 000015D8  6106                     bsr        +0x8 /* 000015E0 */
  1959. label000015DA:
  1960. 000015DA  51CB FFCA                dbf        D3, -0x38 /* 000015A6 */
  1961. 000015DE  4E75                     rts
  1962. fn000015E0:
  1963. 000015E0  41FA 001A                lea.l      A0, [PC + 0x1A /* 000015FC, value 0x7A00B8, cstring "" */]
  1964. 000015E4  E548                     lsl        D0.w, 2
  1965. 000015E6  2B70 0000 FEEC           move.l     [A5 - 0x114], [A0 + D0.w]
  1966. 000015EC  613E                     bsr        +0x40 /* 0000162C */
  1967. 000015EE  2F03                     move.l     -[A7], D3
  1968. 000015F0  3604                     move.w     D3, D4
  1969. 000015F2  48C3                     ext.l      D3
  1970. 000015F4  6100 FF04                bsr        -0xFA /* 000014FA */
  1971. 000015F8  261F                     move.l     D3, [A7]+
  1972. 000015FA  4E75                     rts
  1973. 000015FC  007A 00B8 00B7           ori.w      [PC + 0xB7 /* 000016B5, value 0x5810 */], 0xB8
  1974. 00001602  005B 00C9                ori.w      [A3]+, 0xC9
  1975. 00001606  008A 00D2 00BE           ori.l      A2, 0xD200BE
  1976. 0000160C  00D5                     .incomplete
  1977. 0000160E  00F4                     .incomplete
  1978. 00001610  00D2                     .incomplete
  1979. 00001612  012A 00C9                btst       [A2 + 0xC9], D0
  1980. 00001616  015E                     bchg       [A6]+, D0
  1981. 00001618  00B7 018D 302D FCC6      ori.l      [A7 + A7 * 4 - 0x58], 0x18D302D
  1982. // begin alternate branch 0000161C-00001620
  1983. fn0000161C:
  1984. 0000161C  302D FCC6                move.w     D0, [A5 - 0x33A]
  1985. // end alternate branch 0000161C-00001620
  1986. fn0000161C: // (misaligned)
  1987. fn00001620:
  1988. 00001620  E548                     lsl        D0.w, 2
  1989. 00001622  41FA FFD8                lea.l      A0, [PC - 0x28 /* 000015FC, value 0x7A00B8, cstring "" */]
  1990. 00001626  2B70 0000 FEEC           move.l     [A5 - 0x114], [A0 + D0.w]
  1991. fn0000162C:
  1992. 0000162C  2B6D FEEC FEF0           move.l     [A5 - 0x110], [A5 - 0x114]
  1993. 00001632  2B6D FEEC FEF4           move.l     [A5 - 0x10C], [A5 - 0x114]
  1994. 00001638  046D 0017 FEF0           subi.w     [A5 - 0x110], 0x17
  1995. 0000163E  046D 0018 FEF2           subi.w     [A5 - 0x10E], 0x18
  1996. 00001644  066D 0018 FEF6           addi.w     [A5 - 0x10A], 0x18
  1997. 0000164A  486D FEF0                pea.l      [A5 - 0x110]
  1998. 0000164E  A8A3                     syscall    EraseRect
  1999. 00001650  4E75                     rts
  2000. 00001652  0E50 6169                .invalid.w [A0], 0x6169 /* 'ai' */ // invalid immediate operation
  2001. 00001656  2047                     movea.l    A0, D7
  2002. 00001658  6F77                     ble        +0x79 /* 000016D1 */
  2003. 0000165A  2053                     movea.l    A0, [A3]
  2004. 0000165C  636F                     bls        +0x71 /* 000016CD */
  2005. 0000165E  7265                     moveq.l    D1, 0x65
  2006. 00001660  7300                     moveq.l    D1, 0x00
  2007. 00001662  0B4E                     bchg       A6, D5
  2008. 00001664  6F20                     ble        +0x22 /* 00001686 */
  2009. 00001666  4F6E 6520                chk.w      D7, [A6 + 0x6520]
  2010. 0000166A  5965                     subq.w     -[A5], 4
  2011. 0000166C  7420                     moveq.l    D2, 0x20
  2012. fn0000166E:
  2013. 0000166E  4267                     clr.w      -[A7]
  2014. 00001670  487A FFE0                pea.l      [PC - 0x20 /* 00001652, value 0xE506169, pstring "Pai Gow Scores" */]
  2015. 00001674  A997                     syscall    OpenResFile
  2016. 00001676  301F                     move.w     D0, [A7]+
  2017. 00001678  6B6E                     bmi        +0x70 /* 000016E8 */
  2018. 0000167A  594F                     subq.w     A7, 4
  2019. 0000167C  2F3C 4869 5363           move.l     -[A7], 0x48695363 /* 'HiSc' */
  2020. 00001682  4267                     clr.w      -[A7]
  2021. 00001684  A9A0                     syscall    GetResource
  2022. label00001686:
  2023. 00001686  2B5F FED6                move.l     [A5 - 0x12A], [A7]+
  2024. label0000168A:
  2025. 0000168A  6100 00B0                bsr        +0xB2 /* 0000173C */
  2026. 0000168E  6F4A                     ble        +0x4C /* 000016DA */
  2027. 00001690  4EBA 00DC                jsr        [PC + 0xDC /* 0000176E */]
  2028. 00001694  6B44                     bmi        +0x46 /* 000016DA */
  2029. 00001696  4EBA 00FA                jsr        [PC + 0xFA /* 00001792 */]
  2030. 0000169A  3F03                     move.w     -[A7], D3
  2031. 0000169C  3F3C 000D                move.w     -[A7], 0xD /* '\r' */
  2032. 000016A0  3F3C 008C                move.w     -[A7], 0x8C
  2033. 000016A4  4EBA 0114                jsr        [PC + 0x114 /* 000017BA */]
  2034. 000016A8  226D FED6                movea.l    A1, [A5 - 0x12A]
  2035. 000016AC  2251                     movea.l    A1, [A1]
  2036. 000016AE  E34D                     lsl        D5.w, 1
  2037. 000016B0  D3C5                     add.l      A1, D5
  2038. 000016B2  41ED FD58                lea.l      A0, [A5 - 0x2A8]
  2039. 000016B6  1010                     move.b     D0, [A0]
  2040. 000016B8  0C00 001D                cmpi.b     D0, 0x1D
  2041. 000016BC  6D04                     blt        +0x6 /* 000016C2 */
  2042. 000016BE  10BC 001D                move.b     [A0], 0x1D
  2043. label000016C2:
  2044. 000016C2  4EBA 0394                jsr        [PC + 0x394 /* 00001A58 */]
  2045. 000016C6  6100 00E8                bsr        +0xEA /* 000017B0 */
  2046. 000016CA  226D FED6                movea.l    A1, [A5 - 0x12A]
  2047. 000016CE  2251                     movea.l    A1, [A1]
  2048. 000016D0  2384 501E                move.l     [A1 + D5.w + 0x1E], D4
  2049. 000016D4  3390 5024                move.w     [A1 + D5.w + 0x24], [A0]
  2050. 000016D8  60B0                     bra        -0x4E /* 0000168A */
  2051. label000016DA:
  2052. 000016DA  2F2D FED6                move.l     -[A7], [A5 - 0x12A]
  2053. 000016DE  A9AA                     syscall    ChangedResource
  2054. 000016E0  2F2D FED6                move.l     -[A7], [A5 - 0x12A]
  2055. 000016E4  A9B0                     syscall    WriteResource
  2056. 000016E6  4E75                     rts
  2057. label000016E8:
  2058. 000016E8  487A FF68                pea.l      [PC - 0x98 /* 00001652, value 0xE506169, pstring "Pai Gow Scores" */]
  2059. 000016EC  A9B1                     syscall    CreateResFile
  2060. 000016EE  4267                     clr.w      -[A7]
  2061. 000016F0  487A FF60                pea.l      [PC - 0xA0 /* 00001652, value 0xE506169, pstring "Pai Gow Scores" */]
  2062. 000016F4  A997                     syscall    OpenResFile
  2063. 000016F6  301F                     move.w     D0, [A7]+
  2064. 000016F8  6C00 000A                bge        +0xC /* 00001704 */
  2065. 000016FC  303C 000C                move.w     D0, 0xC
  2066. 00001700  6000 F91E                bra        -0x6E0 /* 00001020 */
  2067. label00001704:
  2068. 00001704  303C 0190                move.w     D0, 0x190
  2069. 00001708  A322                     syscall    NewHandleClear, flags=3
  2070. 0000170A  2B48 FED6                move.l     [A5 - 0x12A], A0
  2071. 0000170E  2250                     movea.l    A1, [A0]
  2072. 00001710  7009                     moveq.l    D0, 0x09
  2073. label00001712:
  2074. 00001712  720B                     moveq.l    D1, 0x0B
  2075. 00001714  41FA FF4C                lea.l      A0, [PC - 0xB4 /* 00001662, value 0xB4E6F20, pstring "No One Yet " */]
  2076. label00001718:
  2077. 00001718  12D8                     move.b     [A1]+, [A0]+
  2078. 0000171A  51C9 FFFC                dbf        D1, -0x6 /* 00001718 */
  2079. 0000171E  D2FC 001C                add.w      A1, 0x1C
  2080. 00001722  51C8 FFEE                dbf        D0, -0x14 /* 00001712 */
  2081. 00001726  2F2D FED6                move.l     -[A7], [A5 - 0x12A]
  2082. 0000172A  2F3C 4869 5363           move.l     -[A7], 0x48695363 /* 'HiSc' */
  2083. 00001730  4267                     clr.w      -[A7]
  2084. 00001732  487A FF1E                pea.l      [PC - 0xE2 /* 00001652, value 0xE506169, pstring "Pai Gow Scores" */]
  2085. 00001736  A9AB                     syscall    AddResource
  2086. 00001738  6000 FF50                bra        -0xAE /* 0000168A */
  2087. fn0000173C:
  2088. 0000173C  4283                     clr.l      D3
  2089. 0000173E  4284                     clr.l      D4
  2090. 00001740  41ED FD04                lea.l      A0, [A5 - 0x2FC]
  2091. 00001744  5848                     addq.w     A0, 4
  2092. 00001746  7006                     moveq.l    D0, 0x06
  2093. label00001748:
  2094. 00001748  2218                     move.l     D1, [A0]+
  2095. 0000174A  B881                     cmp.l      D4, D1
  2096. 0000174C  6E06                     bgt        +0x8 /* 00001754 */
  2097. 0000174E  2801                     move.l     D4, D1
  2098. 00001750  7607                     moveq.l    D3, 0x07
  2099. 00001752  9680                     sub.l      D3, D0
  2100. label00001754:
  2101. 00001754  51C8 FFF2                dbf        D0, -0x10 /* 00001748 */
  2102. 00001758  41ED FD04                lea.l      A0, [A5 - 0x2FC]
  2103. 0000175C  3003                     move.w     D0, D3
  2104. 0000175E  E548                     lsl        D0.w, 2
  2105. 00001760  42B0 0000                clr.l      [A0 + D0.w]
  2106. 00001764  EA8C                     lsr        D4, 5
  2107. 00001766  98BC 0000 0064           sub.l      D4, 0x64 /* 'd' */
  2108. 0000176C  4E75                     rts
  2109. fn0000176E:
  2110. 0000176E  206D FED6                movea.l    A0, [A5 - 0x12A]
  2111. 00001772  2050                     movea.l    A0, [A0]
  2112. 00001774  7AFF                     moveq.l    D5, 0xFFFFFFFF
  2113. 00001776  7009                     moveq.l    D0, 0x09
  2114. label00001778:
  2115. 00001778  2228 001E                move.l     D1, [A0 + 0x1E]
  2116. 0000177C  D0FC 0028                add.w      A0, 0x28 /* '(' */
  2117. 00001780  B881                     cmp.l      D4, D1
  2118. 00001782  5EC8 FFF4                dbgt       D0, -0xE /* 00001778 */
  2119. 00001786  6F08                     ble        +0xA /* 00001790 */
  2120. 00001788  7A09                     moveq.l    D5, 0x09
  2121. 0000178A  9A40                     sub.w      D5, D0
  2122. 0000178C  CAFC 0028                mulu.w     D5, 0x28 /* '(' */
  2123. label00001790:
  2124. 00001790  4E75                     rts
  2125. fn00001792:
  2126. 00001792  206D FED6                movea.l    A0, [A5 - 0x12A]
  2127. 00001796  2050                     movea.l    A0, [A0]
  2128. 00001798  D0FC 018E                add.w      A0, 0x18E
  2129. 0000179C  303C 00B3                move.w     D0, 0xB3
  2130. 000017A0  E24D                     lsr        D5.w, 1
  2131. 000017A2  9045                     sub.w      D0, D5
  2132. label000017A4:
  2133. 000017A4  30A8 FFD8                move.w     [A0], [A0 - 0x28]
  2134. 000017A8  5548                     subq.w     A0, 2
  2135. 000017AA  51C8 FFF8                dbf        D0, -0xA /* 000017A4 */
  2136. 000017AE  4E75                     rts
  2137. fn000017B0:
  2138. 000017B0  7000                     moveq.l    D0, 0x00
  2139. 000017B2  41ED FEEC                lea.l      A0, [A5 - 0x114]
  2140. 000017B6  A039                     syscall    ReadDateTime
  2141. 000017B8  4E75                     rts
  2142. fn000017BA:
  2143. 000017BA  302F 0008                move.w     D0, [A7 + 0x8]
  2144. 000017BE  4EBA F8B0                jsr        [PC - 0x750 /* 00001070 */]
  2145. 000017C2  302F 0006                move.w     D0, [A7 + 0x6]
  2146. 000017C6  4EBA F8BA                jsr        [PC - 0x746 /* 00001082 */]
  2147. 000017CA  6100 F8C6                bsr        -0x738 /* 00001092 */
  2148. 000017CE  594F                     subq.w     A7, 4
  2149. 000017D0  3F2F 0008                move.w     -[A7], [A7 + 0x8]
  2150. 000017D4  42A7                     clr.l      -[A7]
  2151. 000017D6  2F3C FFFF FFFF           move.l     -[A7], 0xFFFFFFFF
  2152. 000017DC  A97C                     syscall    GetNewDialog
  2153. 000017DE  2B5F FEF0                move.l     [A5 - 0x110], [A7]+
  2154. label000017E2:
  2155. 000017E2  42A7                     clr.l      -[A7]
  2156. 000017E4  486D FEEC                pea.l      [A5 - 0x114]
  2157. 000017E8  A991                     syscall    ModalDialog
  2158. 000017EA  302D FEEC                move.w     D0, [A5 - 0x114]
  2159. 000017EE  0C40 0001                cmpi.w     D0, 0x1
  2160. 000017F2  66EE                     bne        -0x10 /* 000017E2 */
  2161. 000017F4  4E56 FFF2                link       A6, -0x000E
  2162. 000017F8  2F2D FEF0                move.l     -[A7], [A5 - 0x110]
  2163. 000017FC  3F3C 0002                move.w     -[A7], 0x2
  2164. 00001800  486E FFF2                pea.l      [A6 - 0xE]
  2165. 00001804  486E FFF4                pea.l      [A6 - 0xC]
  2166. 00001808  486E FFF8                pea.l      [A6 - 0x8]
  2167. 0000180C  A98D                     syscall    GetDialogItem/GetDItem
  2168. 0000180E  202E FFF4                move.l     D0, [A6 - 0xC]
  2169. 00001812  4E5E                     unlink     A6
  2170. 00001814  2F00                     move.l     -[A7], D0
  2171. 00001816  486D FD58                pea.l      [A5 - 0x2A8]
  2172. 0000181A  A990                     syscall    GetDialogItemText/GetIText
  2173. 0000181C  2F2D FEF0                move.l     -[A7], [A5 - 0x110]
  2174. 00001820  A983                     syscall    DisposeDialog
  2175. 00001822  205F                     movea.l    A0, [A7]+
  2176. 00001824  5C4F                     addq.w     A7, 6
  2177. 00001826  4ED0                     jmp        [A0]
  2178. fn00001828:
  2179. 00001828  48E7 1018                movem.l    -[A7], D3,A3,A4
  2180. 0000182C  594F                     subq.w     A7, 4
  2181. 0000182E  3F3C 0082                move.w     -[A7], 0x82
  2182. 00001832  42A7                     clr.l      -[A7]
  2183. 00001834  2F3C FFFF FFFF           move.l     -[A7], 0xFFFFFFFF
  2184. 0000183A  A9BD                     syscall    GetNewWindow
  2185. 0000183C  486D FEEC                pea.l      [A5 - 0x114]
  2186. 00001840  A874                     syscall    GetPort
  2187. 00001842  2F17                     move.l     -[A7], [A7]
  2188. 00001844  A873                     syscall    SetPort
  2189. 00001846  4267                     clr.w      -[A7]
  2190. 00001848  A887                     syscall    TextFont
  2191. 0000184A  3F3C 008D                move.w     -[A7], 0x8D
  2192. 0000184E  3F3C 000C                move.w     -[A7], 0xC
  2193. 00001852  A893                     syscall    MoveTo
  2194. 00001854  487A 00F8                pea.l      [PC + 0xF8 /* 0000194E, value 0xB426967, pstring "Big Winners" */]
  2195. 00001858  A884                     syscall    DrawString
  2196. 0000185A  4267                     clr.w      -[A7]
  2197. 0000185C  487A FDF4                pea.l      [PC - 0x20C /* 00001652, value 0xE506169, pstring "Pai Gow Scores" */]
  2198. 00001860  A997                     syscall    OpenResFile
  2199. 00001862  301F                     move.w     D0, [A7]+
  2200. 00001864  6B00 00C4                bmi        +0xC6 /* 0000192A */
  2201. 00001868  594F                     subq.w     A7, 4
  2202. 0000186A  2F3C 4869 5363           move.l     -[A7], 0x48695363 /* 'HiSc' */
  2203. 00001870  4267                     clr.w      -[A7]
  2204. 00001872  A9A0                     syscall    GetResource
  2205. 00001874  285F                     movea.l    A4, [A7]+
  2206. 00001876  204C                     movea.l    A0, A4
  2207. 00001878  A029                     syscall    HLock
  2208. 0000187A  2654                     movea.l    A3, [A4]
  2209. 0000187C  7609                     moveq.l    D3, 0x09
  2210. 0000187E  781C                     moveq.l    D4, 0x1C
  2211. label00001880:
  2212. 00001880  4853                     pea.l      [A3]
  2213. 00001882  487A 00D6                pea.l      [PC + 0xD6 /* 0000195A, value 0x520776F, pstring " won " */]
  2214. 00001886  486D FD58                pea.l      [A5 - 0x2A8]
  2215. 0000188A  4EBA 01D4                jsr        [PC + 0x1D4 /* 00001A60 */]
  2216. 0000188E  202B 001E                move.l     D0, [A3 + 0x1E]
  2217. 00001892  41ED FE58                lea.l      A0, [A5 - 0x1A8]
  2218. 00001896  4267                     clr.w      -[A7]
  2219. 00001898  A9EE                     syscall    Pack7/DecStr68K
  2220. 0000189A  4EBA 00CA                jsr        [PC + 0xCA /* 00001966 */]
  2221. 0000189E  486D FD58                pea.l      [A5 - 0x2A8]
  2222. 000018A2  487A 00BC                pea.l      [PC + 0xBC /* 00001960, value 0x4206F6E, pstring " on " */]
  2223. 000018A6  486D FD58                pea.l      [A5 - 0x2A8]
  2224. 000018AA  4EBA 01B4                jsr        [PC + 0x1B4 /* 00001A60 */]
  2225. 000018AE  2F2B 0024                move.l     -[A7], [A3 + 0x24]
  2226. 000018B2  3F3C 0200                move.w     -[A7], 0x200
  2227. 000018B6  486D FE58                pea.l      [A5 - 0x1A8]
  2228. 000018BA  4267                     clr.w      -[A7]
  2229. 000018BC  A9ED                     syscall    Pack6
  2230. 000018BE  4EBA 00A6                jsr        [PC + 0xA6 /* 00001966 */]
  2231. 000018C2  554F                     subq.w     A7, 2
  2232. 000018C4  486D FD58                pea.l      [A5 - 0x2A8]
  2233. 000018C8  A88C                     syscall    StringWidth
  2234. 000018CA  301F                     move.w     D0, [A7]+
  2235. 000018CC  E248                     lsr        D0.w, 1
  2236. 000018CE  3F3C 00B3                move.w     -[A7], 0xB3
  2237. 000018D2  9157                     sub.w      [A7], D0
  2238. 000018D4  3F04                     move.w     -[A7], D4
  2239. 000018D6  A893                     syscall    MoveTo
  2240. 000018D8  486D FD58                pea.l      [A5 - 0x2A8]
  2241. 000018DC  A884                     syscall    DrawString
  2242. 000018DE  3F3C 002E                move.w     -[A7], 0x2E /* '.' */
  2243. 000018E2  A883                     syscall    DrawChar
  2244. 000018E4  0644 0010                addi.w     D4, 0x10
  2245. 000018E8  D6FC 0028                add.w      A3, 0x28 /* '(' */
  2246. 000018EC  51CB FF92                dbf        D3, -0x70 /* 00001880 */
  2247. 000018F0  4267                     clr.w      -[A7]
  2248. 000018F2  A994                     syscall    CurResFile
  2249. 000018F4  A99A                     syscall    CloseResFile
  2250. label000018F6:
  2251. 000018F6  082D 0001 FEFE           btst.b     [A5 - 0x102], 0x1
  2252. 000018FC  6708                     beq        +0xA /* 00001906 */
  2253. 000018FE  584F                     addq.w     A7, 4
  2254. 00001900  4CDF 1808                movem.l    D3,A3,A4, [A7]+
  2255. 00001904  4E75                     rts
  2256. label00001906:
  2257. 00001906  A9B4                     syscall    SystemTask
  2258. 00001908  4267                     clr.w      -[A7]
  2259. 0000190A  3F3C 000F                move.w     -[A7], 0xF
  2260. 0000190E  486D FE8A                pea.l      [A5 - 0x176]
  2261. 00001912  A970                     syscall    GetNextEvent
  2262. 00001914  301F                     move.w     D0, [A7]+
  2263. 00001916  67DE                     beq        -0x20 /* 000018F6 */
  2264. 00001918  2F2D FEEC                move.l     -[A7], [A5 - 0x114]
  2265. 0000191C  A873                     syscall    SetPort
  2266. 0000191E  A914                     syscall    DisposeWindow
  2267. 00001920  204C                     movea.l    A0, A4
  2268. 00001922  A02A                     syscall    HUnlock
  2269. 00001924  4CDF 1808                movem.l    D3,A3,A4, [A7]+
  2270. 00001928  4E75                     rts
  2271. label0000192A:
  2272. 0000192A  3F3C 0014                move.w     -[A7], 0x14
  2273. 0000192E  3F3C 0060                move.w     -[A7], 0x60 /* '`' */
  2274. 00001932  A893                     syscall    MoveTo
  2275. 00001934  487A 0006                pea.l      [PC + 0x6 /* 0000193C, value 0x11546865, pstring "There aren\'t any." */]
  2276. 00001938  A884                     syscall    DrawString
  2277. 0000193A  60BA                     bra        -0x44 /* 000018F6 */
  2278. 0000193C  1154 6865                move.b     [A0 + 0x6865], [A4]
  2279. 00001940  7265                     moveq.l    D1, 0x65
  2280. 00001942  2061                     movea.l    A0, -[A1]
  2281. 00001944  7265                     moveq.l    D1, 0x65
  2282. 00001946  6E27                     bgt        +0x29 /* 0000196F */
  2283. 00001948  7420                     moveq.l    D2, 0x20
  2284. 0000194A  616E                     bsr        +0x70 /* 000019BA */
  2285. 0000194C  792E                     moveq.l    D4, 0x2E
  2286. 0000194E  0B42                     bchg       D2, D5
  2287. 00001950  6967                     bvs        +0x69 /* 000019B9 */
  2288. 00001952  2057                     movea.l    A0, [A7]
  2289. 00001954  696E                     bvs        +0x70 /* 000019C4 */
  2290. 00001956  6E65                     bgt        +0x67 /* 000019BD */
  2291. 00001958  7273                     moveq.l    D1, 0x73
  2292. 0000195A  0520                     btst       -[A0], D2
  2293. 0000195C  776F                     moveq.l    D3, 0x6F
  2294. 0000195E  6E20                     bgt        +0x22 /* 00001980 */
  2295. 00001960  0420 6F6E                subi.b     -[A0], 0x6E /* 'n' */
  2296. 00001964  2000                     move.l     D0, D0
  2297. fn00001966:
  2298. 00001966  486D FD58                pea.l      [A5 - 0x2A8]
  2299. 0000196A  486D FE58                pea.l      [A5 - 0x1A8]
  2300. 0000196E  486D FD58                pea.l      [A5 - 0x2A8]
  2301. 00001972  4EBA 00EC                jsr        [PC + 0xEC /* 00001A60 */]
  2302. 00001976  4E75                     rts
  2303. fn00001978:
  2304. 00001978  7208                     moveq.l    D1, 0x08
  2305. 0000197A  4A40                     tst.w      D0
  2306. 0000197C  6F2A                     ble        +0x2C /* 000019A8 */
  2307. 0000197E  0C40 0008                cmpi.w     D0, 0x8
  2308. // begin alternate branch 00001980-00001984
  2309. label00001980:
  2310. 00001980  0008 6C24                ori.b      A0, 0x24 /* '$' */
  2311. // end alternate branch 00001980-00001984
  2312. label00001980: // (misaligned)
  2313. 00001982  6C24                     bge        +0x26 /* 000019A8 */
  2314. 00001984  B06D FCC6                cmp.w      D0, [A5 - 0x33A]
  2315. 00001988  671C                     beq        +0x1E /* 000019A6 */
  2316. 0000198A  012D FEF9                btst       [A5 - 0x107], D0
  2317. 0000198E  6714                     beq        +0x16 /* 000019A4 */
  2318. 00001990  E548                     lsl        D0.w, 2
  2319. 00001992  41ED FD04                lea.l      A0, [A5 - 0x2FC]
  2320. 00001996  2030 0000                move.l     D0, [A0 + D0.w]
  2321. 0000199A  0C80 0000 00A0           cmpi.l     D0, 0xA0
  2322. 000019A0  6E08                     bgt        +0xA /* 000019AA */
  2323. 000019A2  5541                     subq.w     D1, 2
  2324. label000019A4:
  2325. 000019A4  5541                     subq.w     D1, 2
  2326. label000019A6:
  2327. 000019A6  5541                     subq.w     D1, 2
  2328. label000019A8:
  2329. 000019A8  5541                     subq.w     D1, 2
  2330. label000019AA:
  2331. 000019AA  4E75                     rts
  2332. fn000019AC:
  2333. 000019AC  4A40                     tst.w      D0
  2334. 000019AE  6720                     beq        +0x22 /* 000019D0 */
  2335. 000019B0  B07C 00A0                cmp.w      D0, 0xA0
  2336. 000019B4  6520                     bcs        +0x22 /* 000019D6 */
  2337. 000019B6  0C40 7D00                cmpi.w     D0, 0x7D00 /* '}\0' */
  2338. fn000019BA:
  2339. 000019BA  6220                     bhi        +0x22 /* 000019DC */
  2340. 000019BC  3204                     move.w     D1, D4
  2341. 000019BE  E549                     lsl        D1.w, 2
  2342. 000019C0  41ED FD04                lea.l      A0, [A5 - 0x2FC]
  2343. label000019C4:
  2344. 000019C4  2230 1000                move.l     D1, [A0 + D1.w]
  2345. 000019C8  48C0                     ext.l      D0
  2346. 000019CA  B081                     cmp.l      D0, D1
  2347. 000019CC  6214                     bhi        +0x16 /* 000019E2 */
  2348. 000019CE  4E75                     rts
  2349. label000019D0:
  2350. 000019D0  3F3C 0007                move.w     -[A7], 0x7
  2351. 000019D4  6010                     bra        +0x12 /* 000019E6 */
  2352. label000019D6:
  2353. 000019D6  3F3C 0002                move.w     -[A7], 0x2
  2354. 000019DA  600A                     bra        +0xC /* 000019E6 */
  2355. label000019DC:
  2356. 000019DC  3F3C 0003                move.w     -[A7], 0x3
  2357. 000019E0  6004                     bra        +0x6 /* 000019E6 */
  2358. label000019E2:
  2359. 000019E2  3F3C 0004                move.w     -[A7], 0x4
  2360. label000019E6:
  2361. 000019E6  4EBA EFC6                jsr        [PC - 0x103A /* 000009AE */]
  2362. 000019EA  302D FCC4                move.w     D0, [A5 - 0x33C]
  2363. 000019EE  4EBA F680                jsr        [PC - 0x980 /* 00001070 */]
  2364. 000019F2  301F                     move.w     D0, [A7]+
  2365. 000019F4  4EBA F62E                jsr        [PC - 0x9D2 /* 00001024 */]
  2366. 000019F8  584F                     addq.w     A7, 4
  2367. 000019FA  6000 F594                bra        -0xA6A /* 00000F90 */
  2368. export_3:
  2369. fn000019FE:
  2370. 000019FE  4E56 0000                link       A6, 0
  2371. 00001A02  42A7                     clr.l      -[A7]
  2372. 00001A04  2F3C 5354 5223           move.l     -[A7], 0x53545223 /* 'STR#' */
  2373. 00001A0A  3F2E 000A                move.w     -[A7], [A6 + 0xA]
  2374. 00001A0E  A9A0                     syscall    GetResource
  2375. 00001A10  201F                     move.l     D0, [A7]+
  2376. 00001A12  6736                     beq        +0x38 /* 00001A4A */
  2377. 00001A14  2040                     movea.l    A0, D0
  2378. 00001A16  2050                     movea.l    A0, [A0]
  2379. 00001A18  3010                     move.w     D0, [A0]
  2380. 00001A1A  B06E 0008                cmp.w      D0, [A6 + 0x8]
  2381. 00001A1E  652A                     bcs        +0x2C /* 00001A4A */
  2382. 00001A20  302E 0008                move.w     D0, [A6 + 0x8]
  2383. 00001A24  4281                     clr.l      D1
  2384. 00001A26  4282                     clr.l      D2
  2385. 00001A28  5340                     subq.w     D0, 1
  2386. 00001A2A  6008                     bra        +0xA /* 00001A34 */
  2387. label00001A2C:
  2388. 00001A2C  1430 1002                move.b     D2, [A0 + D1.w + 0x2]
  2389. 00001A30  D242                     add.w      D1, D2
  2390. 00001A32  5241                     addq.w     D1, 1
  2391. label00001A34:
  2392. 00001A34  51C8 FFF6                dbf        D0, -0xC /* 00001A2C */
  2393. 00001A38  41F0 1002                lea.l      A0, [A0 + D1.w + 0x2]
  2394. 00001A3C  226E 000C                movea.l    A1, [A6 + 0xC]
  2395. 00001A40  6112                     bsr        +0x14 /* 00001A54 */
  2396. label00001A42:
  2397. 00001A42  4E5E                     unlink     A6
  2398. 00001A44  205F                     movea.l    A0, [A7]+
  2399. 00001A46  504F                     addq.w     A7, 8
  2400. 00001A48  4ED0                     jmp        [A0]
  2401. label00001A4A:
  2402. 00001A4A  226E 000C                movea.l    A1, [A6 + 0xC]
  2403. 00001A4E  32BC 0140                move.w     [A1], 0x140
  2404. 00001A52  60EE                     bra        -0x10 /* 00001A42 */
  2405. export_4:
  2406. fn00001A54:
  2407. 00001A54  4240                     clr.w      D0
  2408. 00001A56  1010                     move.b     D0, [A0]
  2409. export_5:
  2410. fn00001A58:
  2411. 00001A58  12D8                     move.b     [A1]+, [A0]+
  2412. 00001A5A  51C8 FFFC                dbf        D0, -0x6 /* 00001A58 */
  2413. 00001A5E  4E75                     rts
  2414. export_2:
  2415. fn00001A60:
  2416. 00001A60  4E56 0000                link       A6, 0
  2417. 00001A64  4280                     clr.l      D0
  2418. 00001A66  206E 0010                movea.l    A0, [A6 + 0x10]
  2419. 00001A6A  1010                     move.b     D0, [A0]
  2420. 00001A6C  226E 000C                movea.l    A1, [A6 + 0xC]
  2421. 00001A70  D011                     add.b      D0, [A1]
  2422. 00001A72  6406                     bcc        +0x8 /* 00001A7A */
  2423. 00001A74  303C FFFF                move.w     D0, 0xFFFF
  2424. 00001A78  6032                     bra        +0x34 /* 00001AAC */
  2425. label00001A7A:
  2426. 00001A7A  3200                     move.w     D1, D0
  2427. 00001A7C  D27C 0002                add.w      D1, 0x2
  2428. 00001A80  E249                     lsr        D1.w, 1
  2429. 00001A82  E349                     lsl        D1.w, 1
  2430. 00001A84  9EC1                     sub.w      A7, D1
  2431. 00001A86  224F                     movea.l    A1, A7
  2432. 00001A88  12C0                     move.b     [A1]+, D0
  2433. 00001A8A  1018                     move.b     D0, [A0]+
  2434. 00001A8C  5340                     subq.w     D0, 1
  2435. 00001A8E  4EBA FFC8                jsr        [PC - 0x38 /* 00001A58 */]
  2436. 00001A92  206E 000C                movea.l    A0, [A6 + 0xC]
  2437. 00001A96  4280                     clr.l      D0
  2438. 00001A98  1018                     move.b     D0, [A0]+
  2439. 00001A9A  5340                     subq.w     D0, 1
  2440. 00001A9C  4EBA FFBA                jsr        [PC - 0x46 /* 00001A58 */]
  2441. 00001AA0  204F                     movea.l    A0, A7
  2442. 00001AA2  226E 0008                movea.l    A1, [A6 + 0x8]
  2443. 00001AA6  4EBA FFAC                jsr        [PC - 0x54 /* 00001A54 */]
  2444. 00001AAA  4280                     clr.l      D0
  2445. label00001AAC:
  2446. 00001AAC  4E5E                     unlink     A6
  2447. 00001AAE  205F                     movea.l    A0, [A7]+
  2448. 00001AB0  DEFC 000C                add.w      A7, 0xC
  2449. 00001AB4  4ED0                     jmp        [A0]
  2450. 00001AB6  000B 0160                ori.b      A3, 0x60 /* '`' */
  2451. 00001ABA  002B 01DC 002B           ori.b      [A3 + 0x2B], 0xDC
  2452. 00001AC0  0160                     bchg       -[A0], D0
  2453. 00001AC2  004B 01DC                ori.w      A3, 0x1DC
  2454. 00001AC6  000B 0160                ori.b      A3, 0x60 /* '`' */
  2455. 00001ACA  004B 01DC                ori.w      A3, 0x1DC
  2456. fn00001ACE:
  2457. 00001ACE  487A FFF6                pea.l      [PC - 0xA /* 00001AC6, value 0xB0160, cstring "" */]
  2458. 00001AD2  A8A3                     syscall    EraseRect
  2459. 00001AD4  486D FD58                pea.l      [A5 - 0x2A8]
  2460. 00001AD8  3F3C 0084                move.w     -[A7], 0x84
  2461. 00001ADC  302D FE88                move.w     D0, [A5 - 0x178]
  2462. 00001AE0  5240                     addq.w     D0, 1
  2463. 00001AE2  3F00                     move.w     -[A7], D0
  2464. 00001AE4  4EBA FF18                jsr        [PC - 0xE8 /* 000019FE */]
  2465. 00001AE8  43FA FFCC                lea.l      A1, [PC - 0x34 /* 00001AB6, value 0xB0160, cstring "" */]
  2466. 00001AEC  6120                     bsr        +0x22 /* 00001B0E */
  2467. 00001AEE  486D FD58                pea.l      [A5 - 0x2A8]
  2468. 00001AF2  3F3C 0084                move.w     -[A7], 0x84
  2469. 00001AF6  4A6D FE88                tst.w      [A5 - 0x178]
  2470. 00001AFA  6706                     beq        +0x8 /* 00001B02 */
  2471. 00001AFC  3F3C 0006                move.w     -[A7], 0x6
  2472. 00001B00  6004                     bra        +0x6 /* 00001B06 */
  2473. label00001B02:
  2474. 00001B02  3F3C 0005                move.w     -[A7], 0x5
  2475. label00001B06:
  2476. 00001B06  4EBA FEF6                jsr        [PC - 0x10A /* 000019FE */]
  2477. 00001B0A  43FA FFB2                lea.l      A1, [PC - 0x4E /* 00001ABE, value 0x2B0160, cstring "" */]
  2478. fn00001B0E:
  2479. 00001B0E  41ED FD58                lea.l      A0, [A5 - 0x2A8]
  2480. 00001B12  5248                     addq.w     A0, 1
  2481. 00001B14  2F08                     move.l     -[A7], A0
  2482. 00001B16  4280                     clr.l      D0
  2483. 00001B18  102D FD58                move.b     D0, [A5 - 0x2A8]
  2484. 00001B1C  2F00                     move.l     -[A7], D0
  2485. 00001B1E  2F09                     move.l     -[A7], A1
  2486. 00001B20  3F3C 0001                move.w     -[A7], 0x1
  2487. 00001B24  A9CE                     syscall    TETextBox/TextBox
  2488. 00001B26  4E75                     rts
  2489. label00001B28:
  2490. 00001B28  487A FF94                pea.l      [PC - 0x6C /* 00001ABE, value 0x2B0160, cstring "" */]
  2491. 00001B2C  2F3C 0010 0010           move.l     -[A7], 0x100010
  2492. 00001B32  A8B3                     syscall    InvertRoundRect
  2493. 00001B34  3F3C 000F                move.w     -[A7], 0xF
  2494. 00001B38  A9C8                     syscall    SysBeep
  2495. 00001B3A  487A FF82                pea.l      [PC - 0x7E /* 00001ABE, value 0x2B0160, cstring "" */]
  2496. 00001B3E  2F3C 0010 0010           move.l     -[A7], 0x100010
  2497. 00001B44  A8B3                     syscall    InvertRoundRect
  2498. 00001B46  4E75                     rts
  2499. label00001B48:
  2500. 00001B48  2F03                     move.l     -[A7], D3
  2501. 00001B4A  363C 0083                move.w     D3, 0x83
  2502. label00001B4E:
  2503. 00001B4E  42A7                     clr.l      -[A7]
  2504. 00001B50  3F03                     move.w     -[A7], D3
  2505. 00001B52  42A7                     clr.l      -[A7]
  2506. 00001B54  2F3C FFFF FFFF           move.l     -[A7], 0xFFFFFFFF
  2507. 00001B5A  A97C                     syscall    GetNewDialog
  2508. 00001B5C  42A7                     clr.l      -[A7]
  2509. 00001B5E  486D FEEC                pea.l      [A5 - 0x114]
  2510. 00001B62  A991                     syscall    ModalDialog
  2511. 00001B64  A983                     syscall    DisposeDialog
  2512. 00001B66  302D FEEC                move.w     D0, [A5 - 0x114]
  2513. 00001B6A  0C40 0002                cmpi.w     D0, 0x2
  2514. 00001B6E  6E10                     bgt        +0x12 /* 00001B80 */
  2515. 00001B70  670A                     beq        +0xC /* 00001B7C */
  2516. 00001B72  5243                     addq.w     D3, 1
  2517. 00001B74  B67C 0087                cmp.w      D3, 0x87
  2518. 00001B78  6E06                     bgt        +0x8 /* 00001B80 */
  2519. 00001B7A  60D2                     bra        -0x2C /* 00001B4E */
  2520. label00001B7C:
  2521. 00001B7C  5343                     subq.w     D3, 1
  2522. 00001B7E  60CE                     bra        -0x30 /* 00001B4E */
  2523. label00001B80:
  2524. 00001B80  261F                     move.l     D3, [A7]+
  2525. 00001B82  4E75                     rts
  2526. label00001B84:
  2527. 00001B84  42A7                     clr.l      -[A7]
  2528. 00001B86  3F3C 0088                move.w     -[A7], 0x88
  2529. 00001B8A  6006                     bra        +0x8 /* 00001B92 */
  2530. label00001B8C:
  2531. 00001B8C  42A7                     clr.l      -[A7]
  2532. 00001B8E  3F3C 0089                move.w     -[A7], 0x89
  2533. label00001B92:
  2534. 00001B92  42A7                     clr.l      -[A7]
  2535. 00001B94  2F3C FFFF FFFF           move.l     -[A7], 0xFFFFFFFF
  2536. 00001B9A  A97C                     syscall    GetNewDialog
  2537. 00001B9C  42A7                     clr.l      -[A7]
  2538. 00001B9E  486D FEEC                pea.l      [A5 - 0x114]
  2539. 00001BA2  A991                     syscall    ModalDialog
  2540. 00001BA4  A983                     syscall    DisposeDialog
  2541. 00001BA6  4E75                     rts
  2542.